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PAGE 1 
B6000 SERIES MARK 32 

DOCUMENT CHANGES NOTES (D NOTES) 
GENERAL 

D2782 GENERAL - "KIND=DISK" VS. "FAMILYNAME" 
With the implementation of named head-per-t rack disk families ( e spe c i a 1 1 y Khe ab i 1 i t y to name 
them something other than "DISK") and the ability to name a disk-pack family DISK the last 
LiTlr rti!t nrtinn between the two forms of random access mass storage devices has been 
n Hi^le! tne "difference, in the behavior of the operating system when assigning 

files declared as KIND=DISK and KIND=PACK will also be eliminated. 
Tnrrentlv <Mark 31) the selection of random access mass storage devices varies de P en £ J£f "P™ 

K. H H . K5 a Ton th or o.rec! ... 'Zl^ultV KInS val^ts PAC^ne"^^-.^'* 
KJl" '?£; FAMILYNAM^oP'PACK" unless it 8 has been exp. ic i 1 1 y se t to another value In other 
words, the FAMILYNAME (even if assigned a value) is ignored if KIND is DISK and has 
different default values if one has not been explicitly assigned. 

On Mark 33 the values of DISK and PACK for the KIND attribute will become synonymous and the 
default value fo? FAMILYNAME will be "DISK". This has two impl . cat ions s 

1 The FAMILYNAME attribute will be used when assigning files whose KIND is DISK, eliminating 
' the phenomenon of label-equated FAMILYNAMEs being ignored. 

2 The assignment of files on the family "PACK" will require the explicit setting of the 
FAMILYNAME attribute (or the intervention of family substitution). 

TV, -id in the transition to a single default value for FAMILYNAME, on Mark 32 a run-time 

«rn n. w 11 be * ven wheneve? a file from the family named "PACK" is assigned to a logical 

Hie that !s declared w?th KIn£=PACK and the FAMILYNAME has not been assigned. The warning 
message is of the form: 

ATTRIBUTE ERROR: <intname>. FAMILYNAME • (<line number>) 
ON MARK 33, "FAMILYNAME=PACK" MUST BE SPECIFIED 

The warning and the noted problem can be eliminated by changing the logical file declaration to 
include FAMILYNAME="PACK. " . 

D2981 GENERAL - MARK LEVEL DOCUMENTATION 

BsiK's.iii'.iS 2^"i=.::i:; , ::.r: , .sra , «ii" raw:* ns^-s'Wii .kg:'..:: 

Mark II. 7. 

D3090 GENERAL - COMPILER INFO WORD IN SEG ZERO 

The new form of the "compiler info word" in segment zero [word 8] of code !il"rwo2, "° W 
generaTed by all the compilers. This format is described in the Mark 31 GENERAL note D2953. 

D3104 GENERAL - "XALGOL" DEIMPLEMENTED 

As has been cautioned for the two preceding releases XALGOL code "J «/"!"£ to^e"^^^ 11 
Mark 32 and subsequent MCPs . Also, CANDE wi 1 1 not allow a file of type XALGOL to be accessed, 

programs will result in in the following message: 

"XALGOL CODE FILES ARE NOT EXECUTABLE" 
and cause a DSed task history of CAUSE=PROGRAMCAUSE and REASON=NOTEXECUTABLE . The XALGOL 
compiler has been deleted from the Mark 32 SYSTEM tape. 

D3175 GENERAL - MARK "31" SYSTEM NOTES CORRECTIONS 
The system notes for the Mark 31 release contain errors, corrections for which are described 
b e 1 ow . 

"SvstemFile Page" indicates the page number in the file SYSTEMNOTES/REL3 10 contained on tape 
SYSTEm5o?ES310? 8 "Field Eng Page " i ndi cat es the page -™$"»-»S3I^ ■pf.f^'iiaif.?? the 
the file SYSTEMNOTES/REL3 10/FIELDENG contained on tape SYSTEMNOTES 3 1 ; Page indicates tne 
page number in B6000 Series System Notes (Form No. 5011257). 

Corrections to Data Management system notes are described in DMS 1 1 -GENERAL note D3288. 
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Field Eng Page I 
Page 5 

B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 GENERAL 



PAGE 
B6000 SERIES MARK 32 

The Mark 32 r^ase)'?' ' he ACQUIRE messa 8° "hould read as follows (this syntax will change on 

— ACQUIRE --- SHAREMODS <mod range>— — | 

PRIVATEMODS - 



- PROC — <node id> 

-<unit type> — <unit number> — 



System Fi le Page 24 
Field Eng Page 24 
Page 14 



Th 

as 



e fol"ows: f ° r thC ° S n ' eSSage <°P tion >«»t> should also allow ■■• ■ , the semantics for which are 

"* Tit ?? ti0 "^ fPP eari "g '" the list will be ORed with any compi 1 ed-i n options and the net 
result used to control the program dump." vynuiia dig ine net 



System Fi le Page 27 
Field Eng Page 27 
Page 15 

The syntax for the FREE message should read as follows: 

— FREE --- SHAREMODS <mod range>- 

PRIVATEMODS -| 

PROC — <node id> 

-<unit typo — <unit number> — 



System Fi le Page 63 
Field Eng Page 63 
Page 36 

The syntax for the RECONFIGURE message is misspelled; it should read "RECONFIGURE" 



System Fi le Page 136 
Field Eng Page 134 
Page 80 

The syntax for the RECONFIGURE statement should read as foil 

RECONFIGURE INSTALLATION — AS — <group list> 

GROUP | |- DEFAULT 

- INSTALLATION — AS < i ns t al 1 a t i on id>- 

- DEFAULT 



MCP D2430 

The sample host compile deck should read as follows 
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SAMPLE HOST COMPILE DECK 



JOB NEWP/MCP; 
BEGIN 

PT(STATUS=0); 

PROCESS SYSTEM/PATCH [PT] ; 
FILE TAPE = SYMBOL/MCP, 

PATCH = PATCH/NEWPMCP ; 
DATA 

$. COMPARE MARK 
$# 

SCLEAR MERGE LINE INFO MCP MAKEHOST 
<patches> 
? % END PATCH INPUT 

WAIT(PT(VALUE)==1); 

IF PT(VALUE) NEQ 1 THEN ABORT "BAD PATCH"; 

COMPILE NEWP/HOST WITH NEWP [CT] LIBRARY; 
COMPILER FILE TAPE = SYMBOL/MCP ; 
COMPILER FILE CARD = PATCH/NEWPMCP DISK; 

IF CT ISNT COMPILEDOK THEN ABORT "BAD COMPILE"; 
REMOVE PATCH/NEWPMCP; 

BIND NEWP/MCP BINDER[BT] LIBRARY; 

BINDER FILE HOST= NEWP/HOST; 
DATA 

BIND JOBFORMATTER FROM SYSTEM/ JOBFORMATTER; 

BIND CONTROLLER FROM SYSTEM/CONTROLLER ; 

BIND WFL CCSTRINGCONV, CCVARIABLEPPB, CCSTRINGFUNCTION 
FROM SYSTEM/WFL; 

IF BT ISNT COMPILEDOK THEN ABORT "BAD BIND" ; 
END JOB. 



Appendix B Libraries System File Page B-9 

Page B-5 

In Section 5 1, Creating Libraries, the library must be declared within the same block in which 
!? is Used The exLple showing 'Dynamic' and 'Indirect' library linkage should have the 
following declaration inserted between the 7th and 8th lines of the example: 

LIBRARY SAMLIB(TITLE= "OBJECT/SAMPLE/LIBRARY. "); 



System File Page B-16 
Page B-9 

In Section 6.5, COBOL Entry Points and their Parameters, the corresponding ALGOL parameter for 
"Comp, 01" should read as follows: "Real array [0]". 

The following paragraph should be added at the end of Section 6.5: 

"Note: The ALGOL construct using an "♦" in place of "0" in an array parameter can be 
achieved via the WITH LOWER BOUNDS clause." 



System Fi le Page B-18 
Page B-ll 

In Section 8, Libraries in FORTRAN, add the following paragraph at the end of Section 8: 

"Libraries may not be created with or called from FORTRAN programs in which the dollar 
option OPT=l is set or FORTRAN programs which use the batch facility. 
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In Section 8.1, BLOCK GLOBALS Subprogram, the syntax for the <file statement should read 

lull OW S . 

<f i 1 e s t at ement > 

— FILE — <file designator) — ( . 



PAGE 4 



<file attribute; 



<expression>- 

I -<mnemoni c> 

-<boolean file attribute> 



) 



The semantics for <file statement) should be replaced by the following: 



fT^ ^ f !i-K d ? Si? !I a, ?-f iS a " unsi « ned integer from 1 to 99. The <file attribute) is a valid 
file attribute identifier as listed in the I/O Subsystem Reference Manual. The 
or <mnemomc> must be a valid value for the attribute identifier. 



le <expression> 



The <boolean file attribute) is a file attribute identifier of type Boolean. This form of 
the file attribute assignment results in the value of TRUE being assigned to the file 
attribute identifier indicated." B 



System File Page B-19 
Page B-ll 

In Section 8.2, Creating Libraries, the syntax for the <export statement) should read 
<export statement) 

■— - EXPORT <subprogram> I 

| - = <s t r ing> - I 



System File Page B-20 
Page B-ll 

by thTfollowing?' 6311118 Libraries ' the semantics for the <export statement) should be replaced 



,IJ e f ?" bp rog ram > name indicates a subprogram which is to be provided as an entry point t 
trie library. ^ The <string> indicates the name by which the subprogram is to be known to th 
user; if the = <stnng> is not present, the <subprogram> name will be used." 



o 
he 



System File Page B-20 
Page B-12 

Add the following paragraph before the example of a FORTRAN program: 

FXpArI «?.^f^. C i n ?"i y H"?' in th ? mai " P'°8 ram - A " subprograms which are listed in 
LXPORT statements must be declared prior to the first call on FREEZE." 



System File Page B-21 
Page B-12 

In Section 8.3 Referencing Libraries, the semantics for the IN LIBRARY statement should be 
revised by replacing the paragraph preceding the syntax diagram with the following: 

"The IN LIBRARY statement is used to indicate that the subprogram in which it occurs is to 

oe iouna in a library. 
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Also, replace the two paragraphs following the syntax diagram with the following: 

"The <library id> name must be declared in the BLOCK GLOBALS subprogram. The <string> 
indicates the actual name of the subprogram in the library. 

The only other statements which are allowed in a subprogram which contains an IN LIBRARY 
statement are type statements and DIMENSION statements." 

D3193 GENERAL - INSTALLATION OF MARK "32" SOFTWARE 

This note describes procedures for implementing the Mark 32 B6000 series software system. It 
mentions certain operational procedures and references other system notes which describe major 
Mark 32 features. The system notes also contain appendices which document certain software 
products for which manuals are not yet available. It is recommended that installations study 
the complete set of system notes before implementing the Mark 32 release on their systems. 

The Mark 32 release is required for use on the B6900 system. This system is characterized by a 
new architecture for implementing I/O facilities on the B6000 series systems, and integration 
of this new architecture into the B6000 series software has been accomplished on this release. 
The Large Systems software is thus capable of supporting B6700, B6800 and B6900-style systems 
with a single set of software which adapts itself to the system on which it is running at 
initialization time. The operational characteristics of the B6900 are described in system note 
"B6900 Overview". Changes to the NEWP language to support the Mark 32 software are described 
in the NEWP section of the system notes. The SYSTEM/LOADER and UTILOADER have been converted 
to NEW and are capable of loading either from a multiplexor system or a B6900; refer to the 
LOADER and UTILOADER sections of these notes for operating information. 

The Mark 32 software release contains a compiler and support facilities for the ANSI74 COBOL 
language. This compiler supports the full COBOL74 language plus Burroughs extensions, most 
notably those for the DMSII interface. The four new modules released on Mark 32 are indexed 
I/O, debug, inter-process communication and data communications. All modules of the language 
are supported at their highest level. 



The ALGOL, DCALGOL, NEWP and WFL compilers can all be compiled on the Mark 31 level software 
using Mark 31 level ALGOL and DCALGOL compilers. The MCP and CONTROLLER can be compiled on the 
Mark 31 level system, except the Mark 32 level NEWP and DCALGOL compilers must be used, 
allows these items to be compiled as the first phase of a bootstrapping process. Note t 
MCP supplied on the SYSTEM tape can be used with no modification if the installation 



This 
hat the 
has no 



lpp 
local patches 

Two object MCP files are released on the BSYSTEM tape: 

1 . SYSTEM/MCPXXVW/D I AGNOSTICS 
2. SYSTEM/MCPXXVW 

where XX is the mark level and W is the version. 

The following options are SET in the DIAGNOSTICS code file: DIAGNOSTICS, READLOCK, LOCKTRACE, 
EXPERIMENTAL, and are RESET in the other code file. 

When the installation is ready to move to Mark 32, the new MCP can be copied to system disk and 
the CM ODT message used to change to that MCP. It is recommended that this step be taken with 
the mix empty, as loss of information may occur if the primitive (??CM) form of the message is 
used with a non-empty mix. Following the CM, the Mark 32 intrinsics and other system software 
can be copied from the system tape. 

The number of SUBSYSTEMS definable on B6800 Multiprocessor systems has been increased on the 
Mark 32 release (as described in the MS ODT message, GENERAL note D3356) . However , an at tempt 
to CM back to Mark 31 if more than 10 SUBSYSTEMS have ever been defined will result in loss ot 
the job description file. 

In order to improve operator communication with the MCP, many ODT messages will be revised in 
future software releases. The Mark 32 software supports both forms of those messages in order 
to allow the installation to make a smooth transition from the old to the new. Installations 
are advised to begin using the new forms of the messages as soon as possible to minimize any 
transition problems later. Detailed information about the changes to the ODT messages for Mark 
32 is presented in GENERAL note D3356 in these notes. 

To compile Mark 32 software using Mark 31 software, adhere to the following steps: 

1. Compile all software except HOSTSERVICES on the Mark 31.280 
(or later) MCP. 

2. CM to the new MCP. 

3. To compile HOSTSERVICES, the following WFL deck may be used: 
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? BEG IN JOB HS /COMPILE; 

COMPILE SYSTEM/HOSTSERVICES WITH DCALGOL LIBRARY- 
COMPILER FILE TAPE(TITLE=SYMBOL/HOSTSERVICES); 

COMPILER FILE NEWTAPE(TITLE=SYMBOL/HOSTSERVICES , 
SECURITYTYPE=PUBLIC) ; 

COMPILER FILE CODE( * , SECURITYTYPE = PUBLIC)- 

COMPILER FILE CARD(TITLE=HSDATA,KIND=READER,FILETYPE=8) 

COMPILER STACKLIMIT=8000: 

STACK=512; 
?DATA HSDATA 

$ MERGE SEQERR NEWSEQERR 
$ SET LINEINFO NEW 

$ SET VERSION 32.133 * PLEASE CHANGE VERSION 

?END JOB 

Changes required to compile either modified or new software items will be described in a PCN to 
the sample WFL job presented in the SOG Reference Manual, Volume 2 (Form No. 5001688). 

D3201 GENERAL - " CONTROLWARE " FILES 

A procedure has been established for distributing controlware tapes 
CONTROLWARE system notes: 

D319I a description of the file-naming conventions for controlware files 
D3200 a description of the Mark 32 controlware files 

D3203 GENERAL - "B6900" OVERVIEW 

The B6900 system is object-code compatible with the B6800 and supports monolithic 
(uncoupled) configurations. Although the I/O processor and the I/O controls are new, 
changes to the operator and programmatic interfaces to the I/O subsystem have been held 
to a minimum. Some changes in system operation have resulted from the replacement of 
the maintenance display panel by the BDS maintenance processor. 

General Configuration Information 

The following table lists the B6900 hardware modules and, for comparison, the 
approximate B6800 counterpart modules: 



See the fol lowing 



B6900 Hardware Modules 



B6800 Counterparts 



Message Level Interface (MLI) peripheral control interface 

MLI Port (MLIP) multiplexor 

Data Link Processor (DLP) peripheral control 

base peripheral control cabinet 

Network Support Processor (NSP) DCP 

Line Support Processor (LSP) Adapter Cluster 

Other hardware components, such as peripherals, disk pack controllers (D-machines) , and 
magnetic tape controllers (MECs), are the same on the B6800 and B6900. 

The B6900 processors communicate with the I/O subsystem through the Message Level 

Interface Port (MLIP). There is one MLIP for each B6900 processor and up to 8 Message 

Level Interfaces (MLIs) per MLIP. Each MLI connects to a base, as shown in the 
following diagram: 



B6900 
Proc. 



MLIP 



-M-L-I- 



-M-L-I- 



base 



base 



The MLI is connected to the base through a Distribution Card. There may be up to 6 
Distribution Cards in a base, allowing access from up to 6 "hosts". A host is any 
module that has an MLI Port, such as a B6900 processor, a BDS maintenance processor, or 
a Network Support Processor. 

Each base includes a Base Control Card (BCC) , which handles DLP access control between 
multiple hosts, configuration identity, and maintenance control functions. 

?£!«? tha i ha « e more than one Distribu *'on Card must have a Path Selection Module 
(FSM) ; the PSM performs priority resolution and return routing from each DLP to the 
appropriate host. Each base includes a Maintenance Card to connect to the maintenance 
test bus . 
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Each base contains up to 8 Data Link Processors (DLPs), which function as peripheral 
controls. The following DLP types are supported by the Mark 32 software: 



DLP 

CR-DLP 

TP-DLP 

MT-DLP 

CP-DLP 

HT-DLP 

ODT-DLP 

LSP-DLP 

NSP-DLP 



Per ipheral 

B91 15/6/7 Card Reader 

750/1100/1500 LPM Train Printer 

PE Tape 

Card Punch 

(Host Transfer) 225/235/206/207 Disk Pack 

Operator Display Terminal 

Da t a conun lines 

Data comm network (LSPs) 



A DLP can connect to a peripheral, to a peripheral exchange or controller, or, in the 
case of an NSP, to another base. An NSP functions as a host to its associated LSPs and 
connects to the base containing its LSPs through a Distribution Card. 
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NOTE: The diagrams above are schematic and do not represent actual configuration limits 
(for example, an LSP can support more than three data comm lines). Additional 
information about configuration is contained in "D3406 CONFIGURATOR — Soft 
Configuration" (of B6900 systems). 

Data Communications 



The MLIP data communications subsystem consists of Network Support Processors (NSPs) 
and Line Support Processors (LSPs) in place of the B6800 DCPs and Adapter Clusters 
NSPs and LSPs are Data Link Processors and, as such, interface to the main system and 
main system memory through the MLIP. An NSP acts as a host to any base that contains 
one or more of its associated LSPs (see diagram above). 

Software changes relating to data comm, including the new NDL language and compiler 
(called NDLII), the DCAUDITOR program, the NSPDUMPANALYZER program, minor DCWRITE 
restrictions, SOURCENDLII, and the "ID" ODT message, are described or referenced in 
"D3202 DATACOM — B6900 Data Communications". 

Other Software Changes 



The translation between unit numbers and path numbers on the B6900 is different than on 
the B6800. Thus, configuration information returned when requested by a program or an 
operator includes path information in the new format. Changes re 1 ating to the 
GETSTATUS intrinsic are described in "D3251 MCP GENERAL — GETSTATUS/SETSTATUS 
Enhancements". Changes relating to the "OL" ODT message are described in D3356 
GENERAL — New and Old ODT Messages". 

Maintenance 
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Each B6900 processor includes a Maintenance Diagnostic Processor (MDP) , which consists 
of a BDS Maintenance Processor (MP) and a display panel. Field support personnel and 
system operators interface to the MP through an Operator Display Terminal (ODT) . The 
MP requires access to an ODT-DLP and acts as a host to that base (that is, it requires 
its own Distribution Card); it also has access to the maintenance bus. 

In general, the system operator does not need to interface to the MP. However, the MP 
is involved in system initialization and will request some operator participation 
during this process (described below). 

A new peripheral test package, managed by the Peripheral Test Driver (PTD) , has been 
developed for use with the B6900 and replaces the B6800 SCR package. PTD is described 
in "D3123 PTDTEST — B6900 Peripheral Test Driver". 

The MCP error logging procedures generate log entries in a new format appropriate for 
the B6900. LOGANALYZER has been changed to recognize this new format. See "D3355 MLIP 
— Log MLIP I/O Errors". 

Sys tern Opera t ion 



The major changes to the operator interface for the B6900 affect ODT commands, 
configuration file syntax, and system initialization. The changes to the ODT commands 
are documented in "D3356 GENERAL — New and Old ODT Messages". The new configuration 
file syntax is described in "D3406 CONFIGURATOR — Soft Configuration". System 
initialization is described in the following paragraphs. 

System Initialization 

There are three ways to initialize a B6900 MCP, the particular circumstances 
dictating which form must be used: halt/load (memory load), bootstrap load, and 
cool/cold start. 

Hal t /Load 

On the B6900, a portion of memory is reserved for the "memory-resident 
bootstrap", a small program capable of loading the MCP from the Halt/Load 
unit. If the memory-resident bootstrap is valid and there is a valid MCP on 
the Halt/Load unit, the system can be initialized by setting the console "MEM 
LOAD" switch (light ON) and then pressing the console "LOAD" button. 

Bootstrap Load 

If there is a valid MCP on any disk unit but the memory-resident bootstrap is 
not valid, the bootstrap should be loaded via UTILOADER using the following 
procedure : 

1- Mount the BDSUTILITY tape on a magnetic tape unit selected by switches on the 
local system control panel. 

The flexible disk (Part No. 2379 7830) of the Maintenance Processor must be 
installed in the MP Flexible Disk Drive. 

2- Reset the console "MEM LOAD" switch (light OFF) and press the console "LOAD" 
but ton. 

3- When the ODT display 'AWAITING "A/T" ' appears, enter "T UTILOADER" . 

4- Use the HALTLOAD function of UTILOADER, as described in "D3332 UTILOADER — 
UTILOADER on MLIP Systems", to load the memory-resident bootstrap. Specify 
the Halt/Load unit by entering "PK <nn>". 

Cool/Cold Start 

If there is no valid MCP on disk, a tape load of the MCP must be performed. 
UTILOADER must be loaded and its TAPELOAD function used to load 
SYSTEM/LOADER. Then, SYSTEM/LOADER is run to copy the MCP file from tape to 
disk. (SYSTEM/LOADER is described the SOG Manual, Volume II, 52 Form No. 
5001563, Article 5.) After the MCP is copied, a Bootstrap Load must be 
performed to initialize the memory-resident bootstrap. The complete sequence 
is described below: 

1 - Mount the BDSUTILITY tape on a magnetic tape unit selected by switches on the 
local system control panel. 

The flexible disk (Part No. 2379 7830) of the Maintenance Processor must be 
installed in the MP Flexible Disk Drive. 

2- Reset the console "MEM LOAD" switch (light OFF) and press the console "LOAD" 
but ton . 

3- When the ODT display 'AWAITING "A/T"' appears, enter "T UTILOADER" . 

4- Use the TAPELOAD function of UTILOADER, as described in "D3332 UTILOADER — 
UTILOADER on MLIP Systems", to load SYSTEM/LOADER from tape. 

5. Run SYSTEM/LOADER as described in the SOG Manual, Volume II (see also "D3157 
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LOADER — LOADER Improvements"). After SYSTEM/LOADER has copied the MCP code 
file to the appropriate disk unit, the Bootstrap Load process must be 
performed, as described above. 

Changing Ha It /Load Units 



To change Halt/Load units on a running system, the BOOTUNIT ODT message should be 
used. BOOTUNIT is described in "D3356 GENERAL — New and Old ODT Messages". If 
the system is not running, the Bootstrap Load procedure can be used to establish 
the Halt/Load unit. 

Stand-Alone Programs 



In order to perform a Halt/Load, the memory-resident bootstrap code must be 
present in low-order memory. Loading a stand-alone program into low-order memory 
(via the TAPELOAD command of UTILOADER) will overwrite the bootstrap, so that it 
is not possible to do a simple Halt/Load to return to the previous MCP. A 
Bootstrap Load sequence (described above) must be performed. 

GLOSSARY OF TERMS 



Base A module that houses multiple DLPs . 

BCC Base Control Card, a base module that identifies a base and controls access 
to its DLPs and to the base itself. 

BDS The maintenance processor (MP). 

DC Distribution Card, a base module that interfaces a host to a base. 

DLP Data Link Processor, a peripheral control module. 

FR-DLP (obsolete) Frame-Recognition DLP, now called LSP. 

HDP (obsolete) Host Dependent Port, now called MLIP. 

Host An I/O subsystem requestor, such as a processor (MLIP), a BDS, or an NSP. 

LCP (obsolete) Line Control Processor, now called DLP. 

LEM Line Expansion Module, currently not available. 

LSP Line Support Processor DLP, a DLP that directly controls data comm lines. 

MDP Maintenance Diagnostic Processor, the maintenance processor (MP) and display 
panel associated with each B6900 processor. 

MLI Message Level Interface, the interface between the host (MLIP) and the I/O 
Subsys tern. 

MLIP Message Level Interface Port, a module that controls one or more MLIs on 
behalf of a processor. 

MP Maintenance Processor. 

NDLII Network Definition Language II, the (new) NDL for the B6900. 

NSP Network Support Processor DLP, a DLP that controls one or more LSPs and 
provides the logical interface between the host and the data comm network. 

PSM Path Selection Module, a base module that routes messages from a DLP to one 
of mul t ipl e hos t s . 

PTD Peripheral Test Driver, the B6900 MCP procedure that runs the peripheral test 
package . 

SC-DLP (obsolete) Subsystem-Controller DLP, now called NSP. 

B6900 Installation 



General information about installing the Mark 32 software contained in "D3193 GENERAL 
— Installation of Mark 32 Software". 

In addition to the system tapes and maintenance tapes, the following tapes are provided 
for the B6900: 

PTDTESTS 

The PTDTESTS tapes are described in "D3199 PTDTEST — PTDTESTS Tape". 

CONTROLWARE 

The CONTROLWARE tapes are described in "D3200 CONTROLWARE — Mark 32 Disk Pack 
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Control ware Files". 

D3205 GENERAL - INSTRUCTIONS FOR PRINTING DOCUMENTATION 

This release includes documentation files, which may be printed by executing the 
OBJECT/LI STNOTES program and label-equating the file IN appropriately. Task value varies 
according to printer capability. 

To print a file on an EBCDIC96 printer, use the following commands: 

SITE use: 

?RUN OBJECT/LI STNOTES; VALUE=0 

?FILE IN=<use appropriate file title> 

CANDE use: 

E LISTNOTES ; FILE IN = <use appropriate file title> ; value 

To print a file on an EBCDIC72 printer, use the following commands: 

SITE use : 

?RUN OBJECT/LI STNOTES; VALUE=1 

?FILE IN=<use appropriate file title> 

CANDE use: 

E LISTNOTES ; FILE IN = <use appropriate file title> ; value 

To create an EBCDIC96 printer backup tape, use the following commands: 

SITE use: 

?RUN OBJECT/LI STNOTES; VALUE=0 

7FILE IN=<use appropriate file title> 

7FILE LINE(KIND=PRINTER BACKUP TAPE), 

SERIALNO=" <use appropriate serialno>") 

To create an EBCDIC72 printer backup tape, use the following commands: 

SITE use: 

?RUN OBJECT/LI STNOTES; VALUE=1 

7FILE IN=<use appropriate file title> 

?FILE LINE(KIND=PRINTER BACKUP TAPE), 

SERIALNO="<use appropriate serialno>") 

More complete documentation for LISTNOTES may be found in the MARK 32 GENERAL system note 
D3396. 

D3206 GENERAL - " SYSTEMNOTES " TAPE 

Effective with the Mark 32 system software release, the naming convention for tapes containing 
system software notes included with system software releases is the following: 

For major releases: SYSTEMNOTES 

For field update releases: NOTESFOR<rel ease> 

where <release> is a 5-digit number, MMCCC. MM is the mark level and CCC is the cycle; 
e.g. , 32480. 

This note describes the SYSTEMNOTES ta e included in the Mark 32 system software release. It 
contains the following files: 

LISTNOTES and OBJECT/LI STNOTES , which is a program which can be used to print the system 
notes contained on the tape (see GENERAL note D3396 for a description of LISTNOTES). 

SYSTEMNOTES, which is the file of D- and P-notes describing the software contained in this 
release. This file includes the following appendices: DMALGOL Implementation with PCN 
marks indicating changes since the Mark 31 release. 

SYSTEMNOTES/FIELDENG, which is a file of selected P- and D-notes to be used by Field 
Engineering and system technicians. 

NOTE: Some notes cross-referenced in the Field Engineering notes are documented in 
the full set of system notes only. 

OCAUD I TOR/EXAMPLE, which is a BD file containing output from a sample run of DCAUDITOR. 

NDLI I /DOCUMENT, which is a file containing a preliminary user's guide to the NDLI I software 
implementation and its computer controls. 

ITS/DOCUMENT, which is a file describing the Transaction Processing System with PCN marks 
indicating changes since the Mark 31 release. 

DATAD I CT/ DOCUMENT, which is a file describing the Data Dictionary system released on Mark 
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MULTIPROCESSOR/DOCUMENT, which is a file describing the B6800 Multiprocessor system 
released on Mark 31. 

SHAREDRESOURCES /DOCUMENT, which is a file describing the Shared Resources system released 
on Mark 31 . 

D3207 GENERAL - MARK "32" RELEASE TAPES 

The following note describes the contents of the Mark 32 release as shipped with each new 
system. The actual tape names and configuration of files, as well as product style numbers, 
are described in the Distribution Availability Letter. 

The following "bundled" tapes are included in the Mark 32 system software release and are 
applicable to the following systems: 

Tape B6700 B68O0 B6900 



BSYSTEM 


X 


X 


X 


BSYMBOL1 


X 


X 


X 


BSYMBOL2 


X 


X 


X 


BSYMBOL3 


X 


X 


X 


BSYMBOL4 


X 


X 


X 


SYSTESTS * 


X 


X 


X 


SYSTESTSMPX * 


X 


X 




SYSTESTSLANG * 


X 


X 


X 


PTDTESTS 






X 


B9385CW 


X 


X 


X 


B9387CW 




X 


X 


B93 87CWLIST 




X 


X 


SYSTEMNOTES 


X 


X 


X 



* Note: Effective with the Mark 32 release, the SYSTESTS tape has been split into three 
tapes: SYSTESTS, SYSTESTSMPX, SYSTESTSLANG. 

The following "unbundled" DMSIISYSTEM tape is available in the Mark 32 system software release 
and is applicable to the following systems: 

DMSIISYSTEM XXX 

The following files have been added for the Mark 32 system software release: 

FIRMWARE/NSP 

SYSTEM/DCAUDITER SYMBOL/DCAUDITOR 

S YSTEM/GENERALSUPPORT S YMBOL/GENERALSUPPORT 

SYSTEM/KEYEDIO SYMBOL/KEYED I O 

SYSTEM/NDLI I SYMBOL/NDLI I 

SYSTEM/NSPDUMPANALYZER SYMBOL/NSPDUMPANALYZER 

SYSTEM/PL I SUPPORT SYMBOL/PL I SUPPORT 

SYMBOL/SOURCENDLI I 

The following files have been deleted from the Mark 32 system software release: 

SYSTEM/XALGOL SYMBOL/XALGOL 

SYMBOL/FIRMWARE/2 1 5 

SYMBOL/FIRMWARE/ 2 2 5 AND2 3 5 
S YSTEM/DCALGOL I NTR I NS I CS S YMBOL/DCALGOL I NTR I NS I CS 
SYSTEM/PLINTRINSICS SYMBOL/PLINTRINSICS 

SYSTEM/ ALGOLPLINTRINSICS SYMBOL/ALGOLPLINTRINSICS 
SYSTEM/BLOCKCHAR 

The following "unbundled" files have been added as separately-priced items to the DMSII system 
software for the Mark 32 system software release: 

SYSTEM/DBANALYZER SYMBOL/DBANALYZER 

DATABASE/DBMON I TOR 

For the status of CONTROLWARE/FIRMWARE files, see CONTROLWARE note D3191. 

For a description of the FIRMWARE/NSP file, see the syntax and semantics of the ID (Initialize 
Datacom) ODT message in GENERAL note D3356. 

For the status of SYSTESTS files, see SYSTEST note D3197. 

D3257 GENERAL - "IVR" FACILITY ON MARK "33" RELEASE 

Effective with the Mark 33 release, all packs will be initialized via the IVR maintenance 
f ac i 1 i ty . 

On the Mark 32 release, when "IV" is entered on the B6700/B6800 systems for Type 215 and 225 
packs, the following message is displayed: 

"WARNING: IV OPERATIONS MUST BE DONE VIA SCR ON 3 3." 
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When "IV* is entered on MLIP systems, the following message is displayed: 

"ERROR: IV OPERATIONS MUST BE DONE VIA PTD. " 

For a description of the IVR maintenance syntax for Type 215 and 225 packs, see Mark 32 SCRMCP 
note D32S6. 

D3285 GENERAL - DE IMPLEMENTATION OF "ESPOL" COMPILER 

The ESPOL language will no longer be supported beginning with the Mark 33 system release. The 
compiler will not be supplied, CANDE will not MAKE or otherwise handle ESPOL symbolic files and 
WFL will not recognize the compiler's name. 

The Mark 31 PR 1 and Mark 32 ESPOL compiler will unconditionally produce an error message 
describing its unavailability beginning with the Mark 33 system release. 

D3311 GENERAL - "ORGHOSTNAME" ATTRIBUTE DE IMPLEMENTATION 

The task attribute ORGHOSTNAME is now contained in the task attribute ITINERARY; consequently, 
it will be de implement ed on the Mark 33 release. The following warning message is now issued 
when ORGHOSTNAME is used: 

"WARNING - THE ORGHOSTNAME ATTRIBUTE WILL BE DE IMPLEMENTED ON 33. THE INFORMATION FORMERLY 
CONTAINED IN THE ORGHOSTNAME ATTRIBUTE HAS BEEN SUBSUMED BY THE INFORMATION NOW KEPT IN THE 
ITINERARY ATTRIBUTE. THE OLD ORGHOSTNAME IS THE SAME AS THE MOST RECENT ENTRY IN THE 
ITINERARY LIST. " 

D3329 GENERAL - "MYUSE=IO" VS. "UPDATEFILE" ATTRIBUTES 

On the Mark 34 release, the MYUSE file attribute will no longer be used to indicate a request 
for the Update I/O access method when the logical file is assigned to a disk file. At that 
time, only the value of the UPDATEFILE attribute will be used to determine the access method. 
The value of IO for the MYUSE attribute will have the same meaning as for the FILEUSE 
attribute: the logical file can be both read from and written to. 

The UPDATEFILE attribute was implemented on the Mark 25 release to allow the Update I/O access 
method to be specified in a regular manner. Since Mark 25, the COBOL compiler has set the 
UPDATEFILE attribute for a file, whenever the file was opened INPUT/OUTPUT, and reset it for 
all other types of opens; therefore, the only COBOL programs affected by this change will be 
programs written and compiled before Mark 25. 

Beginning with the Mark 32 release, whenever a logical (non-direct I/O) file is assigned to a 
disk file, MYUSE equals IO, and UPDATEFILE has not been set (currently setting UPDATEFILE to 
either TRUE or FALSE overrides the setting of MYUSE), a warning message will be displayed along 
with an UPDATEFILE attribute error message. 

A COBOL program will receive the warning 

-PROGRAM MUST BE RECOMPILED BEFORE 34 TO CONTINUE 
UPDATE I/O ACTION." 

Other programs will receive the warning 

"ON 34, "UPDATEFILE=TRUE" MUST BE SPECIFIED FOR 
UPDATE I/O ACTION. " 

D3341 GENERAL - SUPPORT OF OLD CODEFILES 

On the Mark 32 release, code files more than two releases old (i.e., on Mark 32, the Mark 29 
release and older) will be given the following warning: 

-WARNING: THIS CODE FILE CANNOT BE RUN ON THE NEXT RELEASE (33)". 

As in the past, code files older than Mark 21 will be DSed. 

On the Mark 33 release, code files more lhan three releases old will be DSed. 

Ex amp 1 es : 

On Mark 32, all code files Mark 29 and older will get the warning 

On Mark 33, all code files Mark 30 and older will get the warning 

On Mark 33, all code files Mark 29 and older will get DSed 

On Mark 34, all code files Mark 30 and older will get DSed 

D3348 GENERAL - "FILETYPE=5" FILES 

XALGOL linked, variable length files (FILETYPE=5) will not be supported on the Mark 34 release. 
To help identify programs and files using this record format, a FILETYPE attribute error 
message will be displayed along with the following warning message: 

"ON 34, "FILETYPE=5" FILES WILL NO LONGER BE SUPPORTED" 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 GENERAL 



PAGE 1 3 
B6000 SERIES MARK 3 2 



D3354 GENERAL - INTRINSIC TO LIBRARY CONVERSION 



Phasing Plan 



Over the next few releases, the system intrinsics will be phased over to the system library 
scheme. All Burroughs supplied intrinsics will reside in "support" libraries written in NEWP, 
and user intrinsics must be converted to libraries. The main reason for this conversion is 
that the handling of intrinsic procedures in libraries is easier and more extensible from both 
a system and user standpoint than the current mechanism. 

On the Mark 32 system software release, the intrinsics and support libraries must be initiated 
with the following commands: 

1 . SI + 

2. SL GENERALSUPPORT=SYSTEM/GENERALSUPPORT 

3. SL PLISUPPORT=SYSTEM/PL I SUPPORT 

There are more details about operation aspects of intrinsics under Operational Steps. 

The intrinsic mechanism will cease to exist on the Mark 34 release, and the following steps 
will be taken to facilitate the conversion: 

1 . Mark 32 rel ease 

1. MCP support for the library attributes FUNCTIONNAME and LIBACCESS has been added. 
FUNCTIONNAME allows a library to be referenced by function rather than file title, 
providing a means for linking to a system library. LIBACCESS determines whether a 
library is to be accessed BYTITLE (the default) or BYFUNCTION. (See Mark 32 ALGOL note 
D3530.) This feature is used internally by the MCP to manage support libraries, but is 
also available in ALGOL and NEWP. 

2. The ODT message SL (System Library) has been added to allow definition and management of 
system libraries, including mapping of function names to file: titles. (See Mark 32 
GENERAL note D33S6.) 

3. The ODT message PP (Privileged Program) has been extended to allow the creation of 
privileged transparent programs. This specification causes procedures which are 
contained in the privileged transparent programs to inherit the privilege of the calling 
program. (See Mark 32 GENERAL note D3356.) 

4. Many of the procedures which resided in SYSTEM/ INTRINSICS on Mark 31 and earlier, now 
reside in the support library programs. There are two support libraries being released 
on Mark 32: SYSTEM/GENERALSUPPORT and SYSTEM/PLI SUPPORT. The system will automatically 
link all programs requesting any of these system intrinsic procedures to the proper 
support library procedure or intrinsic procedure. Therefore, there is no impact on user 
programs . 

5. SYSTEM/INTRINSICS contains all intrinsics which have not been converted. These are the 
I/O formatting, BASIC, and some miscellaneous intrinsics which will be converted on Mark 
32 PR1. 

6. SYSTEM/INTRINSICS is now generated by binding only two files, SYSTEM/ESPOLINTRINICS and 
SYSTEM/ALGOLINTRINSICS. User installation intrinsics may also be bound in until Mark 
34. The BINDER issues a warning that user intrinsics are to be de imp 1 emen t ed on Mark 34 
in this case . 

7. SYSTEM/USERSTRUCTURE no longer generates a code file which is bound into the intrinsics. 
It now generates a patch which must be compiled into GENERALSUPPORT . (Users who use 
SYSTEM/USERSTRUCTURE should refer to Mark 32 USERSTRUCTURE note D3605 for details.) 

8. The following files have been converted to the support libraries. and are no longer 
rel eased : 

1. SYSTEM/DCALGOL INTRINSICS (and SYMBOL) 

2. SYSTEM/PLINTRINSICS (and SYMBOL) 

3. SYSTEM/ALGOLPL INTRINSICS (and SYMBOL) 

The documentation for problem fixes and enhancements (P and D notes) is now under 
ESPOL INTRINSICS, ALGOL INTRINSICS , GENERALSUPPORT, and PL I SUPPORT. 

2. Mark 32 PR1 release 

1. All intrinsics will be converted to support libraries. An additional support library, 
SYSTEM/BASICSUPPORT, will be released. This support library will contain the procedures 
needed to run BASIC. 

2. An ESPOL skeletal SYSTEM/INTRINSICS will be released for binding of user intrinsics 
only . 
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3. A warning will be issued when a code file links to a user installation intrinsic, that 
user intrinsics will be de impl ement ed on Mark 34. 

4. A warning will be issued for the use of array INTRINSICINFO (available in ALGOL), that 
it will be deimplemcnted on Mark 34. 

5. A warning will be issued for the use of the SINTRINSICS option (in ALGOL), that 
intrinsics will be de imp 1 ement ed on Mark 34. 

6. A warning will be issued for the use of the SINSTALLATION option in all compilers, that 
intrinsics will be de impl ement ed on Mark 34. 

7. Since all the intrinsics will be converted on this release, the documentation for 
problem fixes and enhancements (P and D notes) will occur under GENERALSUPPORT , 
BASICSUPPORT, and PL I SUPPORT. 

3 . Mark 33 release 

1. The ESPOL compiler will not be released. 

2. The SYSTEM/ INTRINSICS will be released as a skeletal ALGOL host for binding user 
intrinsics. (Note, this file was ESPOL on Mark 32 PR1 . ) 

3. The warnings stated under Mark 32 and Mark 32 PR1 will continue to be given. 

4. The compilers will generate code to link directly to the support libraries through the 
normal library linkage mechanism. Mark 32 and earlier compilers generated calls on the 
intrinsics which the Mark 32 MCP routed to SYSTEM/ INTRINSICS or the proper support 
library. This routing will continue for Mark 32 and earlier code files, but will not be 
needed for Mark 33 code files. This change will not impact user programs. 

4. Mark 34 release 

1. SYSTEM/ INTRINSICS will not be released, and the intrinsics mechanism and the ODT 
messages CI, SI, and WI will be de impl ement ed . 

2. The array INTRINSICINFO (available in ALGOL) will be de impl emented. 

3. $ INTRINSICS (ALGOL) will no longer be recognized as a system dollar option. 

4. SINSTALLATION will no longer be recognized as a system dollar option. 

5. User programs compiled with Mark 32 PR1 release and earlier will continue to run because 
the MCP will continue to link system intrinsic procedures to the correct support library 
procedures . 

Operational Steps 

SYSTEM/ INTRINSICS have been partially converted to two system support libraries: 

SYSTEM/GENERALSUPPORT and SYSTEM/PLI SUPPORT. Therefore, SYSTEM/ INTRINSICS and these two 

support libraries have been released on 32. When the conversion is complete, there will also 
be a SYSTEM/BASICSUPPORT (Mark 32 PR1). 

User intrinsics may continue to be bound to SYSTEM/INTRINSICS . However, this facility will be 
deimplemcnted on Mark 34 and SYSTEM/INTRINSICS will not be released on Mark 34. The user 
should convert these intrinsics to libraries. 

The support libraries have reserved FUNCTIONNAMEs . These FUNCTIONNAMEs are as follows with a 
brief description of the library contents: 

1. GENERALSUPPORT - This library currently contains all mathematical and various other 
intrinsic procedures formerly contained in SYSTEM/INTRINSICS. When the conversion is 
complete on 32 PR1 , all the I/O formatting intrinsics will also reside in GENERALSUPPORT. 

2. PLISUPPORT - This library contains the support procedures for PL/I . 

3. BASICSUPPORT - This library will be released on Mark 32 PR1 and will contain the support 
procedures for BASIC. 

The SL ODT message is used to initiate support libraries, as follows: 

SL <funct ionnamo = <library code file title> 
For example, GENERALSUPPORT is initiated with the following: 

SL GENERALSUPPORT = SYSTEM/GENERALSUPPORT ON SYSPACK 
A usercode and family name is permitted in the <library code file title>. 
Only installations which use PL/I or the pre-Mark 32 ISAM need to initiate PLISUPPORT. 
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To initiate SYSTEM/ INTRINS ICS , the SI (or CI) ODT message is still used. 

If the appropriate support library is not running when a program needs to link to it, the 
program will hang with a "MISSING < f unc t i onname> " (e.g. "MISSING GENERALSUPPORT" ) . When this 
happens, the library may be SLed, and the program will continue. 

NOTE: SLing to a support library is different than SLing to a user library, since SL will 
initiate a support library but not a user library. In either case, SL links a 
< func t ionr.ams> to a <library code file title>. 

SL differs from SI (CI) in that SL wi 1 1 immediately respond if the support library is 
not resident. (SI initiates an independent runner which hangs on a "no file" if the 
intrinsic file is not resident.) 

A running support library may be discontinued with SL - < f unc t ionname> . The support library 
will continue to run until all its users terminate. New users which require that <func t ionname> 
will hang until another linking SL is performed. Normally, a user should not DS a support 
library, since this will DS all users connected to it. 

NOTE: A support library can only be initiated (or re-initiated) via a linking SL. This may be 
done at any time. The support libraries may not be explicitly RUN or explicitly linked 
to (i.e. via LIBRARY declaration). 

A support library may be changed at any time with SL. The former support library will continue 
until all of its current user programs terminate. All new user programs will link to the new 
support library. If the system halt/loads, all restarting user programs will link to the new 
support library. 



Software Generation 

1. The following example WFL deck shows how the support libraries may be recompiled: 

? BEGIN JOB COMPILESUPLIBS; 

SUBROUTINE COMP(STRING LIB); 
BEGIN 

TASK T; 

COMPILE SYSTEM/#LIB WITH NEWP[T] LIBRARY; 

COMPILER FILE TAPE(TITLE = SYMBOL/#LIB) ; 

COMP I LER DATA 
$ CLEAR MERGE LINE INFO SEQERR NEWSEQERR 

9 

IF T IS COMPILEDOK THEN 

WAIT("PP SYSTEM/" & LIB & ": TRANSPARENT ", OK) 
ELSE 

ABORT "RECOMPILE " & LIB; 
END; % COMP 

COMP ( " GENERALSUPPORT " ) ; 
COMP( "PL I SUPPORT" ) ; 

? END JOB 

2. Before a system support library is SLed, it must be PPed through the ODT as follows: 

PP <library title> : TRANSPARENT 

This is extremely important and establishes the library as privileged transparent. (See 
Mark 32 GENERAL note D3356.) Essentially, this guarantees that a privileged program which 
invokes the support library remains privileged during the invocation, and that a 
non-privileged program which invokes the support library remains non-privileged. 

3. The procedure for compiling SYSTEM/ES POL INTRINS ICS and SYSTEM/ ALGOLINTRINS ICS has not 
changed . 

4. The following example WFL deck shows how the SYSTEM/ INTRINS ICS are now created: 
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? BEGIN JOB BINDINTRINSICS; 
TASK T; 

BIND SYSTEM/ INTRINSICS WITH BINDER[T] LIBRARY- 
COMPILER FILE HOST(TITLE = SYSTEM/ INTRINSICS) ; 
COMPILER DATA 

$ INTRINSICS 

BIND = FROM SYSTEM/ESPOLINTRINSICS, SYSTEM/ALGOLINTRINSICS; 



IF T ISNT COMPILEDOK THEN 

ABORT "RE-BIND INTRINSICS' 



? END JOB 



5. The procedure for binding user intrinsics has not changed. 

6. The UDSTRUCTURETABLE is no longer a code file which is bound into SYSTEM/ INTRINSICS . 
SYSTEM/USERSTRUCTURE now generates a patch which must be compiled into the GENERALSUPPORT 
library. (Users who require this feature should refer to Mark 32 USERSTRUCTURE note D3605 
for details of the procedure.) 

D3356 GENERAL - NEW AND OLD "ODT" MESSAGES 

In order to improve operator communication with the MCP, many ODT messages have been revised or 
will be revised in future software releases. 

Primarily, the changes made allow the mix-related messages to appear only in the following 
f o rim : 

<mix number list> ODT MESSAGE. 

Previously, ODT MESSAGE <mix number I i s t > has been also allowed. 

The first release of the B6800 Multiprocessor system and the Mark 31 system release allowed 
either form; the Mark 33 system release will allow only the new syntax forms. 

The following list shows the old and new menmonics released on Mark 31 where applicable, syntax 
for which is described herein; syntax for all other previous forms is unchanged, except as 



Auto Backup 

Clear Queued Messages 

Display System Intrinsics 

Ini t ial ize Da t acorn 

Dump Memory 

Prevent Schedule Jobs Entering Mix 

Make or Modify Queue 

Reconfigure 

Transfer Log 

Display Mix Entries 

Mixl imi t 

Display Peripheral Status 

Display System Configuration 

Make User 

Restores Display of Active Job 

Reserve Specified Area of Disk 

Reset Options 

Remove Reader Security Restrictions 

Set Options 

Tape Directory 

Opt ions 

Unit Reserved, Avai labl e 

Display Date 

Display System Intrinsics 

Display Time 

Change Supervisor 

Force From Schedule Queue 

The following messages were added or modified for the B6800 Multiprocessor system: 

A (Active Mix Entries) 

ACQUIRE 

CF (Configuration File) 

CU (Core Usage) 

DL (Disk Location) 

FREE 

GC (Group Configuration) 

HN (Hostname) 

HU (Host Usercode) 

J (Job and Task Structure) 

LP (Lock Program) 



noted : 




Old 


New 


AP 


AB 


BRK 


CQ 


CI 


SI 


DC 


ID 


DP 


DUMP 


EI 


HS 


EQ 


MQ 


IV 


RC 


LR 


TL 


M 


MX 


MIXL 


ML 


P 


PER 


PC 


SC 


PU 


MU 


RESTORE 


SUPPRESS 


RET 


RES 


RO 


OP 


RR 


SR- 


SO 


OP 


TD 


TDIR 


TO 


OP 


UA 


UR- 


WD 


TD 


WI 


SI 


WT 


TD 


WS 


CS 


xs 


FS 
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ML (Mixlimit) 

MQ (Make or Modify Queue) 

MS (Make Subsystem) 

MX (Mix Entries) 

NET (Network) 

PG (Purge) 

PF (Privileged Program) 

RECONFIGURE 

RY (Ready) 

S (Scheduled Mix Entries) 

SN (Serial Number) 

SV (Save) 

SW (Swapper) 

W (Waiting Mix Entries) 

WM (What MCP) 

The following messages have been added or modified on the Mark 32 release: 

ACQUIRE 

BOOTUNIT 

CM (Change MCP) 

HN (Hostname) 

HU (Host Usercode) 

ID (Initialize Datacom) 

LH (Load Host) 

MA (May Access) 

NET (Network) 

NW (Network Prefix) 

OL (Label Table) 

OF (Options) 

PP (Privileged Program) 

SP (Show Print Queue) 

SQ (Show Queue) 

SL (System Library) 

SW (Swapper) 

TERM (Terminal) 

THAW 

Tl! (Times) 

UR (Unit Reserve) 

Y (Status Interrogate) 

The Mark 32 system software release supports monolithic and multiprocessor B670O and B6800 
configurations and monolithic B6900 configurations. The examples of some ODT messages may 
differ slightly depending on the type of system configuration. 

The following note describes changes to ODT messages on the Mark 31 and Mark 32 system software 
releases. PCN marks in the right margin indicate Mark 32 changes. 

A (Active Mix Entries) Message 



Revised Syntax: 
— A 

-/1\- ALL 



--/1\- SWAPPER 

/1\- MCSNAME <mcsname>- 



-/1\- IN <subsystem id> 

|- ( <processor id list> ) 
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<proces sor id 1 i s t > 

< 



- GLOBAL 
_ i 

_ 2 

_ 3 

- 4 



Revised Semantics: 



The A (Active Mix Entries) message lists all active jobs and tasks. If ALL is used, any 
active jobs or tasks which have been suppressed by the SUPPRESS message are displayed in 
addition to unsuppressed tasks. In order to avoid congestion in ADM, frozen libraries are 
displayed by the A ALL and the MIX commands; they are no longer displayed in an ACTIVE mix 
picture. 



When SWAPPER is specified, only jobs running in swapspace will be displayed. 

When MCSNAME is specified, only jobs that originated from the specified MCS will 
di spl ayed. 



be 



On a B6800 multiprocessor system, each displayed task is preceded by a subsystem indicator: 
processor id for a local memory task, "G" for a global memory task, or blank for a task 
whose subsystem location is currently unassigned. 



the subsystem identified or the 



When IN is specified, only jobs with stacks running 
processor identified will be displayed. 

A typical response to the A message is as follows: 

7 ACTIVE ENTRIES 

0232 JOB 80DCP/Q 
0234 JOB 70SYSTEM/CANDE 
0243/0244 55 ESPOL JKL 
0254/0254 55#SEPCOMP JHOST2/HOST 
•0255x0256 55 ALGOL KAP 

The lower case "x" between the job and task number in the last entry of the example 
indicates that the job is under control of an MCS. Swap jobs are flagged with an "#" 
between the priority number and the file name. The number in the active entry heading 
(7) is the total number of active entries including suppressed entries. 

New Example : 

A ALL MCSNAME=SYSTEM/CANDE 



This message will display all active jobs (including suppressed) that originated from 
SYSTEM/CANDE. 

New Example: (B6800 Multi-Processor System): 

A SW IN(3) 

This message will display all active jobs (excluding suppressed) whose stacks are 
running in swapspace and are currently swapped into processor 3. 

AB (Auto Backup) Message 

AB replaces the AP (Auto Backup) Message. 
Syntax : 
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AB 
AP 



-<number> — 



_ CP 

_ LP 

CP <number>- 

■ LP - 



S cman l ics : 

The AB (Auto Backup) message sets the maximum number of ABed line pir inters »»J/or card 
punches This number if set to zero at Halt/Load time if the MCP option AUTORECOVERY is 
reset. When AUTOBACKUP is looking for a line printer or card punch to use 'or automat l C t 
output of backup files, it begins looking for on-line ABed units. If AUTOBACKUP cannot 
find any ABed units, it tries any on-line line printer or card punch. 

This message may appear simply as AB, in which case the system responds ; by displaying the 
current number of line printers and card punches available to AUIOBACK.UF . 

Ex amp 1 e : 
AB 



AB MAX=2; CP MAX=1; AB-ED LPS=0; AB-ED CPS=0 

When a number immediately follows the AB, that number is used as the 
copies of AUTOPRINT allowed. 

Ex amp 1 e : 

AB 3 



maximum number of 



AB MAX=3; CP MAX=1; AB-ED LPS=0; AB-ED CPS=0 

When a number and device immediately follow the AB, that number 
number of copies of AUTOPRINT allowed on that device. 

Ex amp 1 e : 
AB 3 LP 



is used as the maximum 



AB MAX=3; CP MAX=0; AB-ED LPS=1; AB-ED CPS=0 

When a device and unit number immediately follow the AB, the indicated output device 
ABed. 

Ex amp 1 e : 

AB LP 12 



The number of devices assigned may exceed the number of allowed copies of AUTOBACKUP. The 
following sequence of AB messages allows one AUTOBACKUP printing on LP 5 . 

Example : 
AB 

AB LP 5 



AUTOBACKUP may be disabled on the indicated device by preceding the speci f i ed device wi th a 
hyphen When such a message references a device upon which output is currently being 
generated, this activity is allowed to proceed to a normal termination before the device is 
d i sabl ed . 

Ex amp 1 e : 

AB-CP 13 
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When use of AB results 
and AB 



all line printers and card punches being freed of the ABed status 




Backup files introduced by Library Maintenance (i.e., COPY, COPY&COMPARE and ADD) from tape 
are picked up by this rebuilding of the queues and will be printed in turn. 

Ex amp 1 e : 



COPY BD/0000365/0000366/000TASKFILE 
COPY BP/0000367/O0003 68/0O0TASKFILE 

Backup files of this form will be picked up. 

COPY BD/0000365/0000366/000TASKFILE AS JEV/TASKFILE 

Backup files of this form will not be picked up. 

ACQUIRE Message 



Syntax : 

— ACQUIRE --- SHAREMODS <mod range>- 

PRIVATEMODS -| 

- PROC — <nodc id> 

-<unit type> — <unit number>- 



SAVE - 
SV 



Revised Semantics: 

Existing groups can be altered by the ACQUIRE and FREE messages. The ACQUIRE message 
allows an active group to acquire additional resources. When a unit is ACQUIREd, it is 
automatically RYed unless the SAVE option is specified. Also, if a system has a unit that 
J S j"^' '" " se and another system wishes to acquire that unit, the desired unit is SAVEd 
(and CLOSEd if appropriate) and FREEd automatically. 

Revi sed Exampl e : 

PER MT 



l^l*j* STATUS 

81*P [HALL ] 1600 #1 1:0 MEMORY/DUMP [1,2] 

82 NOT AVAILABLE TO GROUP 
8 3 NOT AVAILABLE TO GROUP 

ACQUIRE MT 8 2 

MT 82 WILL BE ACQUIRED 
PER MT 

MT STATUS 

81*P [HALL ] 1600 #1 1:0 MEMORY/DUMP [1,2] 
82*P [MIKE ] 1600 SCRATCH [12 

83 NOT AVAILABLE TO GROUP 

ACQUIRE MT 83: SAVE 

MT 83 WILL BE ACQUIRED 
PER MT 

MT STATUS 

81»P [HALL ] 1600 #1 1:0 MEMORY/DUMP [1,2] 
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82*P [MIKE ] 1600 SCRATCH [1,2] 
83*P [000001] SAVED 

AD (Access Duplicate) Message 

Revised Syntax: 

AD <familyname> — ( — <f ami ly index> — ) 



- ON 



Semant ics : 

The AD (Access Duplicate) message causes the access structure (SYSTEM/ACCESS or 
SYSTEM/CATALOG) to be duplicated. The duplicate structure has the family index number 
appended; e.g., SYSTEM/ACCESS/002 or SYSTEM/CATALOG/003 The family index represents a 
member of the Catalog or Access family. 

Example : 

AD 2 

*608 IOB 80 COPYDIR 

AD- causes the referenced access structure to mo longer be considered a duplicate. The 
actual file is not removed. 

Example : 

AD- 2 



SYSTEM/ACCESS/002 REMOVED 

ADM (Automatic Display Mode) Message 

ADM has been revised, as follows: 
MIX has been changed to MX. 
Revisions made to the following messages have been applied to ADM also: 

A (Active Mix Entries) 

J (Job and Task Structure Display) 

ML (Mixlimit) 

MX (Mix Entries) 

S (Scheduled Mix Entries) 

W (Waiting Mix Entries) 

See the description of the individual messages for details. 
Syntax : 

Unchanged 
Semant ics : 

Unchanged 
Example : 

Unchanged 

AP (Auto Backup) Message 
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AX (Accept) Message 

Revised Syntax: 

— <mix number list> — AX — <text> — I 
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Semant i cs : 

Unchanged 
Example : 

Unchanged 

BOOTUNIT Messge 

The BOOTUNIT message specifies new bootstrap units via software. 

This message provides, on MLIP systems, an analogy to the Halt/Load pins present on MPX 

systems. 

The BOOTUNIT message is valid on a B6900 system only. 
Syntax : 

— BOOTUNIT | 

- PK <unit no>-| 

- DK - 



Ex amp 1 es : 

1) BOOTUNIT PK 50 

2) BOOTUNIT 

Example 1) is the form of the message on monolithic B6900 systems. It specifies PACK 50 to 
be the next Halt/Load unit. 

Example 2) is the interrogation form of the message, which causes the current boot straD 
unit to be displayed on the ODT. »n»p 

BRK (Break) Message 

BRK has been eliminated; see CQ (Clear Queue) for new message. 

CF (Configuration File) Message 

Syntax : 

— CF I 



-<f i 1 e name>- 



Semant i cs : 

NOTE: B6900 Multiprocessor systems are not supported on the Mark 32 release. 

The CF message is used to designate or display the title of the current configuration fil. 

CF with no options displays the title of the current configuration file. 
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CF+ selects SYSTEM/CONFIGURATION, the default, as the configuration file. 
CF- removes the designation of the configuration file. 
CF <file name> selects the named file as the configuration file. 
Ex amp 1 e : 
CF 

CONFIGURATION FILE: (EVANS)SYSTEM/GMMCONFIG/022079 
CF + 

SYSTEM/CONFIGURATION IS THE CONFIG. FILE 
CF XYZ 



XYZ IS THE CONFIG. FILE 
CI (Change Intrinsics) Message 

CI has been eliminated; see SI (System Intrinsics) for new message. 
CM (Change MCP) Message 

Syntax : 

Unchanged 
Semant i cs : 

The CM ODT message has been changed to simplify and accelerate the creation of duplicated 
MCPs Formerly! when an MCP was to be duplicated (or triplicated), CM always created a 
brand new file for each family index involved. This is no longer required. Now, CM 
messages of the following forms: 

CM <f i lename> . . . 

or 

CM <filename> FMLYINX <nnn> . . . 

are handled as follows: 

1. CM locates the specified file using the full name given in the command. 

2. CM then makes a list of the f i 1 enames that are required for each f, ami ly index If 
"<filename> FMLYINX<nnn> " is specified, <nnn> is changed. If FMLYINX<nnn> is not 
specified, CM appends the correct member for each family index. 

3. CM then attempts to locate the required file for each member If a file i s found and 
the code files are "identical" (as determined by the compiler timestamp), that tile is 
used for that member; otherwise, a new file is built for that member. 

4. CM then copies or moves rows as required and continues with normal CM. 
CQ (Clear Queue) Message 

Syntax : 

CQ —-—| 
|- BRK -| 

Semant i cs : 

The CQ (Clear Queue) message clears system messages queued for the operator display 
terminal 

A typical response to the CQ message is the following: 
MESSAGES FLUSHED 
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CS (Change Supervisor) Message 



CS incorporates the WS (What Supervisor) message. 
Revised Syntax: 

— CS . I 



-<file title> — ON — < fami lyname>- 



Semant i cs : 

The CS (Change Supervisor) message displays, cancels or designates as a "supervisor" 
program a code disk file specified by a file title, as follows: 

CS Displays the current supervisor 

CS- Cancels the current supervisor 

CS <file title> Designates the supervisor 

The file must be present when CS is executed. 

At Halt/Load time, the supervisor program is automatically entered into the mix If the 
run-time system option DUPSUPERVISOR is set, the MCP will attempt to execute a code file 
<file ti tle>/FMLYINX<nnn>, where <nnn> is the family index. If DUPSUPERVISOR is reset, the 
MCP will attempt to execute the designated supervisor program. 

Example : 

CS 



SUPERVISOR: SYSTEM/SUPERVISOR 
CS- 

SUPERVISOR: NOT SPECIFIED 
CS SUPPRESS/MIX/NOS 



SUPERV I SOR : SUPRES S /M I X/NOS 



CU 



CU (Core Usage) Message 
Revised Syntax: 

|-<mix number list >— | 

S eman t i cs : 

Unchanged 

New Exampl e : 

The resulting display for a B6800 multiprocessor system will depend upon the number of 
local processors comprising the system. A 2-processor system could produce the 
fol lowing : 
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CORE USAGE AT 10:21:04 

GLOBAL MEMORY 

AVAILABLE 255028 

NON SAVE 105882 

SAVE 32306 

TOTAL 393216 

SYSTEM TOTAL 

AVAILABLE 398838 

NON SAVE 764849 

SAVE 253529 

TOTAL 1417216 



LOCAL MEMORY 1 

AVAILABLE 111967 

NON SAVE 301632 

SAVE 98401 

TOTAL 512000 



LOCAL MEMORY 2 

AVAILABLE 31843 

NON SAVE 357335 

SAVE 122822 

TOTAL 512000 



As the number of processors increase, the number of local memory statistic blocks will 
increase . 

For a single B6800 with global memory, the display will be of just the local memory with 
one additional line giving the total of the shared (global) memory ava.lable. 

DC (Datacom Initiation) Message 

DC has been eliminated; see ID (Initialize Datacom) for new messages. 
DD (Directory Duplicate) Message 

Revised Syntax: 

D D <familyname> — ( — <fami ly index> — ) — | 

| 1 |_ ON -I 

Semant ics : 

Unchanged 
New Example : 

DD TIOMASTER (2) 



ACTIVE ENTRIES- 



*9303 JOB 80 COPYDIR 



DL (Disklocat ion) Message 



Syntax : 

DL 

- DISKLOCATION 



- BACKUP 

- USERDATA 

- OVERLAY — ( <processor id list> ) 

- JOBS 

- CATALOG 

- LOG — <familyname> 



- ON — <fami lyname>- 
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<processor id 1 i s t > 

< 

- GLOBAL 

- ] 

- 2 

- 3 

- 4 



Semant i cs : 

Hal t/Loid' family' i<>n) meSSage s P ecifi " that system files reside on families other than the 

families 16 f °™ ° f DL ' '" " Sed l ° interr °8 ate » h « current settings of the various "DL" 

A typical response to the DL message is as follows: 

DISK LOCATION: 
CATALOG ON DISK 
JOBS ON DISK 
USERDATA ON DISK 
BACKUP ON BKPACK 
LOG ON DISK 
OVERLAY ON DISK 



The DL OVERLAY specification allows the 



t . - , , ,„ --- user t0 direct system OVERLAY file allocation (and 

the consequent overlaying I/O activity) to any desired family. For a B6800 Mult processor 

System, each processor has .ts own DL OVERLAY specification to ensure direct I/O access ?o 

memory being overlayed. Different local processors may not be able to access di ect y 



the 
the 



same disk-type devices. 



The processor id list> specification for an OVERLAY family is meaningful only for a B6800 
Mult. processor System, and is rejected on ODT inputs to a monolithic system 

The presence of each per t inent DL OVERLAY family is checked at system initialization time 
and whenever an ODT ,n P ut attempts to change a specification. (Thi s "presence " check 
includes a test for proper I/O visibility on a B6800 Multiprocessor Sys"em ) If a familv is 
not present, an RSVP wait allows the user the following options ** stem > a tamily is 



1. Mount the family baseunit and "OK" the RSVP wait. 



2. "OF" 
i n i t 
f ami 
<Hal 
prev 

Wh e n e v e 
(mono! i 
file is 
corresp 
gi ven f 
runni ng 



or "DS" the RSVP wait to disassociate DL OVERLAY from 
lalization time, the unsatisfied DL OVERLAY specification 
lyname>; on a B6800 Multiprocessor System, the default for a local processor is the 



the missing family. (At 
defaults to the <Halt/Load 



t/Load familyname> for "that processor. If the wait arose from an ODT input the 
.ous family specification for the DL OVERLAY case in question is retained.) 

I,,"" 1 OVERLAY specification is changed, the MCP overlay file for the system 
» \tl m processor (multiprocessor) is immediately moved to the new family. This 
ond ns ^flr/T^H 7 ' "! l ' al ' za " ° "J f a DL OVERLAY specification is other than the 
ond ng <Halt/Load familyname>; other overlay files, however, once allocated on a 
amily, are never moved. Thus , chang i ng a DL OVERLAY family while the system is 
affects only the allocation of new overlay files. system is 



Ex amp 1 e : 

DL OVERLAY MYPACK 



<job#> OVERLAY SET TO MYPACK 

The DL BACKUP specification, and a corresonding extension to the "SB" ODTmessaee allow „ 
site to direct its PRINTER and PUNCH BACKUP files to any desired familv The *SB" 
extension recognizes "DLBACKUP" as a valid substitute backup specification y ' 

A new task attribute " BACKUPFAM I LY " , has been implemented; it may be set only bv the MCP 
?L TASK M ?if ? ?eC,f yi ng DLBA< * UP as a substitute backup medium causes he BACKUPFAM iLY^n 
the TASK (if valid, otherwise the current DL BACKUP family specification) to be the f ami v 

?nto W th: h BACKU?FlMlLY nd of PU the ^^ l"? "S 0pe i! ed -. TheV BAOHJpM-ilyn^e ?. S U 
into trie MACKUFf AM I LY of the job stack when the job s initiated- task attribiitp 

store's'tnrDL'BACKgp'f 8 f hiS BA, T K y™ILY to all sticks ini t i.t.d under «h job CANDE 
the 8 „ T^f af? blckT'V '°r° n tl - m V, a " d .P r °P a 8 a t<=s it to all tasks begun under 
tne session. Thus, all backup files for a job/session normally go to a single family, even 
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if .he DL BACKUP family is changed during a job or CANDE session. (This, of course, need 
not be true if SB specifications were changed during the job/sess.on, and .s not true for 
backup files explicitly directed elsewhere.) 

lis •3::s:,".: ta .t«i; u {."'JS n E. ,, sia.i:.; k ;rt:!.'Wi:KT. 'Ji'!:: 1 ?^; .:'=: 

present, an RSVP wait allows the user the following options: 

1. Mount the family baseunit and "OK" the RSVP wait. 

2. "OF" the RSVP wait to keep the missing family as the DL BACKUP specification. 

■x -n<5" the RSVP wait to disassociate DL BACKUP from the missing family- ( At 
3 - i ,ia a. f tYme the DL BACKUP specification defaults to the <Hal ./Load f am, lyname> ; 

DSing a wait resulting from an ODT input causes the previous DL BACKUP family 

specification to be retained.) 
The CANDE commands BACK and BDREMOVE automatically find files on DISK, PACK and the 
session's BACKUPFAMILY. 

Example : 

DL BACKUP MYPACK 

<job#> DL BACKUP FAMILY SET TO: MYPACK 

causes JOBS DL to default to the Halt/Load family). 
Example : 

DL JOBS ON MYPACK 

DISKLOCATION FOR JOBS WILL BE CHANGED 
The DL CATALOG specifications allows the operator to specify the catalog family. It works 
in the same fashion as JOBS. 

Ex amp 1 e : 

DL CATALOG ON MYPACK 

DISKLOCATION FOR CATALOG WILL BE CHANGED 

The DLLOG specification allows a site to. have its SYST EM/SUMLOG file ™ m n f « in n d se ° n fo * n a 
desired family. Efficiency considerations suggest that the DL LOG t ami ly cno ^n lor a 
bIIoO Sul processor System be directly visible to each local Pressor, but *'» " e ^ not 
be the case. SYSTEM/LOGANALYZER has been changed to search the DL LOG family tor any log 

file whose location has not been explicitly specified. 

During system initialization, the specified DL LOG family must be present or the DL LOG 

specification defaults to the <Halt/Load familyname> as a non-IAD file. 

When an attempt is made to change the DLLOG specification via an ODT input , an RSVP wait 
occurs if thenewly specified family is not present and the user has the following options: 

1. Make the family baseunit available and "OK" the RSVP wait. 

2. "OF" or "DS" the RSVP wait to discard the requested change and maintain the previous DL 
LOG specification. 

Assuming any required family is present, MCP action when changing the DL LOG specification 

is as fol lows : 

1. A Log Release ("LR") is done on the SYSTEM/SUMLOG on the old DL LOG family. 

2 If a valid SYSTEM/ SUMLOG file already exists on the new DL LOG family, it is continued; 
otherwise, a new SYSTEM/SUMLOG is opened. 

Exampl e : 

DL LOG MYPACK 

<job#> SUMLOG IS ON MYPACK 
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The DL USERDATA specification, along with a corresponding change to SYSTEM/MAKEUSER allows 
a site to maintain its SYSTEM/USERDATAFILE on any desired family. "/"i^usek, allows 

^VQTpi/^nAATA^??! the ? L U ? ERDATA family via an ODT input succeeds provided there was no 
!sYs¥em/u™a?1fmf h th£ °' d DL USERDATA family (or the old family was not present! "? 
a SYMEM/USERDATAFILE does exist, MCP action is as follows: 

1. The presence of the new DL USERDATA family is verified: if it is not nresent the n«er 

SIeRDAtT ° F ''? ? " I 1 " 6 resu,tin « MVP w.i/.o abort the'change and ?e , £i n* t he ' pre vtous DL 

u a uuM ia spcci r icat I on, 

2. A check is made to determine whether a SYSTEM/USERDATAFILE already exists on the new 
family; if ,t does, an RSVP wa i t allows the user the following options: 

a. "DS" the RSVP wait to abort the DL USERDATA change, or 

b. "RM" the RSVP wait to remove the file, or 

c. dispose of the file in some other way, and "OK" the wait. 

3 " IyItEM/USERDATAF??'f M/USER ? ATAFI ^ , U , co ? ied to the new USERDATA family; the 
SYSTEM/USERDATAFILE on the old family is renamed "USERDATAFILE/<da t e-t ime> " . (Should 
the copy fail, the DL USERDATA change is aborted.) " isnouio 

If there is no SYSTEM/USERDATAFILE on the USERDATA family, or that family is not nresent 
and a non-i nt erac t i ve request is made for userdata information, MCP action is as follows- 

' n!,!!!n re iS ™° fami| y- a "REQUIRES PK" RSVP message is displayed, with OK, DS or OF 
options OK causes repeated demand for the family; DS terminates the requestor- OF 
causes the code to proceed without the family. requestor, w 

2 If the family is present but has no SYSTEM/USERDATAFILE, or if "REQUIRES PK" messaee was 
USERDATA DI°? ill* " N ° F JT R ^P message is displayed.' If the T option iT""S? The 
USERDATA DL family is set to the familyname of the resulting unit. 

Ex amp 1 e : 

DL USERDATA MYPACK 



SYSTEM/USERDATAFILE WAS MOVED TO MYPACK 
DP (Dump) Message 

DP has been eliminated; see DUMP (Dump Memory) for new message. 
DR (Date Reset) Message 

Revised Syntax: 

— DR — <mm> — / — <dd> — / — <yy> — | 

Revised Semantics: 



The DR (Date Reset) message may be used to change the date currently in use by the MCP 
The des.red date is specified by <mm> , <dd>, and <yy>, which are one- to two-dLi numeric 
indications of the month, date, and year, respectively. U, K" numeric 



The delimiter must be a slash ("/"). 
New Exampl e : 
DR 04/22/75 



DATE IS TUESDAY APR 22, 1975 (75112) 
(75112) indicates that the year is 1975 and the date is day 112. 

DS (Discontinue) Message 

Revi sed Syntax : 
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— <mix 



number 1 i s t> — DS 



-<opt ion 1 i s t >- 



<opt ion 1 i s t> 



- ALL 

- NONE 

- FAULT 

- DSED 

- BASE 

- ARRAYS 

- CODE 

- FILES 

- DBS 

- LIBRARIES 

- PRIVATELIBRARIES 

- SIBS 



Revised Semantics: 

::s,^?.!1:s^-k:-s?; ::i.c!rs\:Ksi?i:\S2."- •""" """"" '" 

Options for the program dump are as follows: 

ALL Dump all items in the stack and also list code segments. 
Use the default dump options. 



NONE 
FAULT 

DSED 



Tprolram dump will occur only if the program is DSed. A program dump is not 
invoked at the time the message is entered. 



BASE Dump the base of the stack which is used by the operating system. 

ARRAYS Dump all present arrays. 

CODE Dump all code segments. 

FILES Dump all areas used by files. 

DBS Dump SIB and data base stack. 

LIBRARIES 

Dumps library stack. 

PRIVATELIBRARIES 

Dumps only private library stacks. 

SIBS Dumps only SIB. 

Ex amp 1 e : 

Unchanged 
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DUMP (Dump Memory) Message 



DUMP replaces the DP (Dump Memory) Message. 
Revised Syntax: 

DUMP 

- DP 



<nonnumer i c t ext > 

<text> " 

<mix number list> DUMP 

|- DP J |-<option list>- 



<opt ion 1 i s t > 



- ALL — 

- NONE - 

- FAULT - 

- DSED — 

- BASE — 

- ARRAYS 

- CODE — 

- FILES - 

- DBS 



- LIBRARIES 

- PRIVATELIBRARIES 

- SIBS 



Semant ics : 

TnvokTa" P^am^m^orr^JtTc-ul^r p^ojram. dUmP ^ "«"• ^ S ° f ■« »'* <° tape or 
Te::o n e f r a ?S e ea d ump f0 " OWi " 8 the DUMP ' that Strin « appears in the memory dump tape as the 
Options may be used on a program dump as follows: 

Ine n^ i ?:^l^^ d n fo i C on^o! i :„e W p;o«^m°X With "' """ '•"-'■ <*<"» and 

dump"!! KTtZVXl me^age n ?s D ^e?ed d . FAULT ' ThiS wM1 N ° T inv ° ke * P'»«'« 
Use the default dump options. 



ALL 

NONE 
FAULT 

DSED 

BASE 

ARRAYS 

CODE 



A program dump will occur if the program is DSed 
invoked at the time the message is entered. 



A program dump is 



not 



Dump the base of the stack which is used by the operating system. 
Dump all present arrays. 
Dump all code segments. 
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FILES Dump all areas used by files. 

DBS Dump SIB and data base stack. 

LIBRARIES Dumps library stack. 

PRIVATELIBRARIES ,.„t. 

Dumps only private library stacks. 

SIBS Dumps only SIB. 

The DUMP message for.a P-Bramjil, set/reset P-anently ^ dump options Jor^this 

'pelmed ir/the'message* " A ! ."non^dump options^ not affected by a DUMP message. 

Ex amp 1 e : 

3132 DUMP ALL 



EI (Emergency Interrupt) Message 

EI has been eliminated; see HS (Hold Schedule) for new message. 
EQ (Eliminate Queue) Message 

EQ has been eliminated; see MQ (Make or Modify Queue) for new message. 

FA (File Attribute) Message 
Revised Syntax: 



< • 

— <mix number list>— FA <file attribute assignment 1 

Semant i cs : 

Unchanged 
New Example : 

7988 FA VERSION=12, CYCLE=13 

FM (Form Message) Message 

Revised Syntax: 

— <mix number 1 ist> — FM — <dev i ce> — <uni t number>— | 

Semant ics : 

Unchanged 
Ex amp 1 e : 

Unchanged 

FR (Final Reel) Message 

Revised Syntax: 

— <mix number list> — FR — | 
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Sealant ics : 
Unchanged 

Example : 
4423 FR 

FREE Message 



Syntax : 

— FREE SHAREMODS <mod range> 

- PRIVATEMODS -| 

- PROC — <node id> 

-<unit type> — <unit number> — 



Semant ics : 



^ iS H J ? 8 g r ° UpS C *" be » ltered «»y the FREE and ACQUIRE messages The FREF „...«»» 

to detach resources from an „ii». „-„„_ ■— <"'«v messages, me vkmu message is used 

"freed". Disk packs must also be cIoHd f Us t." ^ nust be SAVE " before they can be 



Exampl e : 
PER MT 



MT STATUS 

l\l$ [H£b L 1 ,60 ° * l ,:0 MEMORY/DUMP [1,21 
82*P [MIKE ] 1600 SCRATCH [1.2] 

FREE MT 82 



UNIT IN USE 
SV MT 82 



MT 82 SAVED 
FREE MT 82 



MT82 FREED 
PER MT 



MT STATUS 

ir'nwr^ulm 1 ^ #1 1:0 MEMORY/DUMP [1,2] 
82 NOT AVAILABLE TO GROUP 



FS (Force from Schedule) Message 

FS replaces the XS (Exceed Schedule) message. 
Syntax : 

— <mix number list> FS I 

- XS - 



Semant i cs : 



IT !s e uL S ond?t?:„a S ny d , n ,^^:r 8e A! 8 8 o en !t r m f y b^dT ' ?" °' thC '■««»•< .ch.d-1. 
queue, as well as one initiated but Vchedu ed *-y tne MCP tIVV ? J °S ° Ut ° f a sch ^ulin 
response to this message. " Dy tne MCP " The system does not display 
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Ex amp 1 e : 
7852 FS 

CSC (Group Configuration) Message 

Revised Syntax: 

— GC -— I 

- TO <f i 1 ename> -| 



Revised Semantics: 

The GC (Group Configuration) message displays the current group configuration. 

The ac TO ,filename> message causes a disk file to be created containing a "decompiled" 

E:^:: , \i!!: u R- , *:?rils.'Ks , .a: rrs.'S.tsra: as'a c^,o8K™ ;„,: 

D3406 and UTILOADER note D3332 for the format of this information. 
Example : 
GC 

Response for Multiprocessor System: 

**•** GROUP CONFIGURATION ***** 

GROUP ID: BLUE 

PROCESSOR PORTS: A000 PROC ID. = 1 
PERIPHERALS ALLOWED TO GROUP: 

12-13.32-33,42-43,69-71,81-83,193-194 

GLOBAL MEMORY STATUS : 

PRIVATE MEMORY AVAILABLE: NONE 

PRIVATE MEMORY IN USE: NONE 

SHARED MEMORY AVAILABLE: 32-33 , 38-39 , 44-45 , 50-5 , 56-57 , 62-63 

SHARED MEMORY IN USE: 32-33,38-39,44-45,50-51 

Response for Monolithic System: 

***** GROUP CONFIGURATION ***** 
GROUP ID: DEFAULT 
PERIPHERALS ALLOWED TO GROUP: 

1-255 
GLOBAL MEMORY STATUS: 

PRIVATE MEMORY AVAILABLE: NONE 

PRIVATE MEMORY IN USE: 0-63 

SHARED MEMORY AVAILABLE: NONE 

SHARED MEMORY IN USE: NONE 

Response for B6900 System: 

GROUP ID: BLUE 
PROCESSORS : 

PROC A; 
MEMORY : 

PRIVATE MODS 32-59; 
SHAREREAD MODS 60-61; 
I/O: 

BASE 2/1/0 

HOST 1 

ADDRESS DLPID 48 HT1 
ADDRESS 1 DLPID 48 HT1 
ADDRESS 3 DLPID 2 ODT1 
ADDRESS 4 DLPID 5 ODT1 
ADDRESS 7 DLPID 70 NSP1 ; 
BASE 1/1/0 
HOST 1 

ADDRESS 3 DLPID 1 TP1 ; 
DEPENDENT HOST 4 DLPID 70 

ADDRESS DLPID 71 LSP1 
ADDRESS 1 DLPID 72 LSP1 ; 
PERIPHERALS: 

UNITS 1,2,5,48,49,50; 
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HI (Except ionevent ) Message 

Revised Syntax: 

— <mix number list> — HI 



S email t i cs : 

Unchanged 
Example : 

4312 HI 

HN (Hostname) Message 

__ HN 1 

| -<name>- 



-<number>- 



Each HOST in the network is identified by a HOSTNAME. HOSTNAMEs must be unique i e no 
two systems in the network may have the same HOSTNAME at the same time. This name' is 'used 
by programs and users to identify the location of resources to which access s desired A 



., r-~* — y -»-•»»» '»"'"> i"«= location ot resources to which access is desired j 

ostname consists of 1 to 17 alphanumeric characters, beginning with a letter A system' 

ostname may be set or modified only at halt/load time. fifch hoft must have a L 

ssigned before attempting to establish communication with another host nostnam. 



hos t name 

h 

a 



HK <name> will establish a hostname at the next halt/load. HN will displaj 



hostname 



the 



HS (Hold Schedule) Message 



HS replaces the EI (Emergency Interrupt) message. 
Syntax: 

-— HS 1 

EI - 



Semant ics : 

The HS (Hold Schedule) message stops the selection of jobs from th 
schedule into execution. HS- resumes job selection. HS? displays 
the current status of job selection. 



ys 



Exampl e : 
HS 

JOB SELECTION STOPPED 

and to resume normal operations 
HS- 



JOB SELECTION RESUMED 



HS? 



HOLD SCHEDULE IS RESET 
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HU (Host Usercode) Message 

Syntax : 

— HU --- 



-<usercode>- 



An installation has the ability to establish a default usercode for all operations done via 

the ODT. 

HU <usercode> will set the host usercode. 

HU will display the current host usercode. 

Inquiries from ODTs that have no usercode associated with them, and are directed to another 

host, will have the host usercode passed along. 

ID (Initialize Datacom) Message 

ID replaces the DC (Datacom Initiation) message. 
Syntax: 

ID - 

- DC - -<number-l>- | 



-< ident i f i er>- 



ON <familyname> - 



-/1\- QUIT 

-/1\- DUMP 

-/1\- NSPLEVEL <number-2>- 



-/1\- OPTION - 7 - — T ALL - 

NONE 



-<number-3>- 



Revised Semantics: 

The ID ODT message is used for any of the following reasons: 

1. To initialize a Data Communications Process (DCP) or Network Support Processor (NSP) . 

2 To initialize or modify various Data Communications-related items including the prefix 
for the NIF and DCPCODE files, the suffix for the NSP firmware file and m. see 1 1 aneous 
opt ions . 

3. To interrogate the current setting of the items mentioned in 2 above. 

4. To direct commands to the DCCONTROL process in control of an NSP. 

If a number is specified for <number-l>, it is interpreted as a DCP number of mul t i pi exor 
systems or an NSP unit number for Message Level Interface Port systems. If the specif. ed 
NSP/DCP is not already running, it will be initialized. 
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If J an ,Jl d .2lii. fi 5 r . 8ppear8 in the message, that identifier is used as the prefix for the NIF 
will E Tt to "SyItEMV ^ th<! NSP/DCP - If " mi " US ( "> 3PPearS in th£ Se»»«e. t^ Prefix 

If QUIT appears in the message, the NSP specified by <number-l> will be shut down If 
<number-l> was not specified, all running NSPs will be shut down. 

If DUMP appears in the message, the NSP specified by <number-l> will be directed to dump 
.'° c ?' . -emory to the HALTLOAD disk unit in a file titled "DUMP/NSP/<number-l > V If 

»«??!: "° speclfled > a " running NSPs will be directed to dump their local 

m 6 mo r I gs • 

, r «ff? PLE yfr a f£f a f?,l n the . m f ssa 8e, the number specified by <number-2> will be used as the 
suffix for the firmware file used to initialize an NSP. If <number-2> is specified as 
no suffix will be used. The file title will be "FIRMwARE/NSP/< suf f i x> " . This Hie is 
expected to reside on the HALTLOAD disk unit. 

If OPTION appears in the message, the option byte will be set as follows: 

ALL sets the option byte to all ones and will reset to zero any following options. 

NONE sets the option byte to all zeros and will set to one any following options. 

<number-3> may be any value from through 7. 

<+><number-3> will set that option and any following options. 

<-><number-3> will reset that option and any following options. 

The following options apply to NSP systems only. 

0: AUDIT ALL DCINITIAL INITIATED I/O ACTIVITY TO THE NSP. 

1: AUDIT ALL DCCONTROL INITIATED I/O ACTIVITY TO THE NSP. 

2: AUDIT ALL DCP FORMATTED REQUESTS AND RESULTS IN DCCONTROL. 

3: AUDIT ALL DCWRITE FORMATTED REQUESTS AND RESULTS IN DCCONTROL. 

4: TTTAKING M THE P DtMp REQUESTED WI ™ IN DCCON ™ 01 " AUDIT ALL INTERNAL QUEUE STRUCTURES PRIOR 

5: RESERVED 

6: RESERVED 

7: AUDIT ALL NSP ERROR CONDITIONS. 

The audit activity mentioned above will be written to the HALTLOAD disk unit. This audit 

1 ' "" then be ana yzed using SYSTEM/DCAUDITOR. Since each audited item requires a 

InJ!?-H? a ! ' A * " Se 0f auditin « (particularly if all datacom messages are 

audited) can adversely affect system performance. 8 

Jsp a f?r™«,ri!\ diSplay i he ValUC ? ° f the current NIF Prefix, the next NIF prefix if any, the 
NSP firmware level, and any options which are set. 

IL (Ignore Label) Message 

Revi sed Syntax : 

— <mix number list> — IL — <device> — <unit number> — | 

Semant i cs : 

Unchanged 
Exampl e : 

7924 IL MT113 



IV (Initialize and Verify) Message 

IV has been eliminated; see RC (Reconfigure) for new message. 
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] (Job and Task Structure Display) Message 



Revised Syntax: 

__ j 

-/1\- ALL 



-/1\- SWAPPER 
-/1\- MCSNAME 



-<mcsname>- 



-/1\- IN <subsystem id> 

|- ( <processor id Iist> ) 



<processor id 1 i s t> 

< 

- GLOBAL 
1 

2 

3 

4 



Revised Semantics: 

The J (Job and Task Structure Display) message lists the tasks by job »t r »£ture. If * LL |* 
used, any active jobs or tasks which have been suppressed by the SUPPRESS message are 
displayed in addition to unsuppressed tasks. J does not show jobs in the job queue; the !>Q 
(Show Queue) message serves that purpose. 

When SWAPPER is specified, only jobs running in swapspace will be displayed. 

When MCSNAME is specified, only jobs that originated from the specified MCS will be 
d i spl ayed . 

On a B6800 multiprocessor system, each displayed task is preceded by a subsystem indicator: 
processor id for a local memory task, "G" for a global memory task, or blank for a task 
whose subsystem location is currently unassigned. 

When IN is specified, only jobs with stacks running in the subsystem identified or the 
processor identified will be displayed. 

See "Queue-Level Scheduling" and Figure 1-2 for a discussion of the queue-matching 

a I g o r i t hm . 

The mix picture for a job running three tasks in parallel might look like the following: 

0230 JOB 55 

. . 0231 5 5 COBOL TASK/A 

. . 0233 5 5 COBOL TASK/B 

S. . 0234 55 ALGOL TASK/C 

Note that every task and job has a different mix number. The number 55 is the priority, 
equal in this case for all the tasks shown. 

The different tasks in a job may be in different states. Any of them "ay be active, 
scheduled, completed or waiting for operator action The left -««'»*"• >•«*" f, w 8g f "? 
anv of the job's tasks which are not active, as follows: S for scheduled tasks, w tor 
wait?ng talks (RSVP required) and E for compiles which have a syntax error ""P 1 "** 
tasks are not shown within the job structure. An asterisk *" preceding a job or task 
indicates the task is displayed for the first time in a particular category. Swap jobs are 
flagged with an "#" between the priority number and the file name. 
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A job placed in the reader may never show in the job structure for any of three reasons, 
first, the job may have finished before a mix display (MX) was requested. In this cj 




A typical response to a J message is shown in the example. 
Ex amp 1 e : 



-JOB STRUCTURE- 



* 3044 JOB 50 COPY & COMPARE SY 
*W. . 3045 50 LIBRARY/MAINTENANCE 
3072 JOB 60 INTERIMFR26 

E. . 3041 50 SYSTEM/REL/ ALGOL ON INTERIM26 
*E. . 3060 50#ALGOL (JONES) CANDE/CODE60 

W. . 3080 50 ALGOL (GORD) SYSTEM/PL1 
*S.. 3097 50 PL/1 (GORD) CANDE/CODE1 080 

Swap jobs are flagged with an "#" between the priority number and the file name. 
New Example : 

J ALL MCSNAME=SYSTEM/CANDE 



SYSTEM/CANDE WiU dJSp,ay a " active J obs (including suppressed) that originated from 

New Example: (B6800 Mu 1 t i -Proces sor System): 
J SW IN(3) 

This message will display all active jobs (excluding suppressed) whose stacks are 
running in swapspace and are currently swapped into processor 3. 

LH (Load Host) Message 

Syntax : 

— LH — PK — <unit no>— -- MPX <mpx no> PATH <path no> > 

|- PATHID <pathid no> 1 

>- , 

|-<f i let i 1 1 e >— I 

Revised Semantics: 

eiitner MPX^IrS^r "j^™* tK*^ ! ° U i ar path Ca " be s P e <= ifi <=° f<" B6700 and B6800 systems by 
ni!? n„ R«onn . ID J bl S!£i,£ r ? re <l u ' red between MPX and <mpx no> and PATH and <path 

ii h'.n "tm??n l^v! °" ly PATHID ,s accepted; any attempt to use MPX PATH is rejected 
wi tn an INVALID SYNTAX message. 

Ex amp 1 es : 

LH PK 60 MPX 1 PATH 2 

LH PK 60 PATHID 6 

LH PK 60 PATHID 14 SYSTEM/NEWFIRMWARE 

LJ (Log to Joblog) Message 

Revised syntax: 

— <mix number list> — LJ — <text> — I 
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Semant ics : 

Unchanged 
Ex amp 1 e : 

Unchanged 

LP (Lock Program) Message 

Syntax : 

— <mix number list> — LP 



Semant ics: 

The LP (Lock Program) message is provided to disable certain ODT messages which may 
interfere with program execution. Once locked, the DS and QT messages will be invalid for 
the locked task. 

LP- removes the LP restriction. 

Ex amp 1 e : 

7094 LP 

7094 PROGRAM LOCKED. 
7094 LP - 

7094 NOT LOCKED. 

LR (Log Release) Message 

LR has been eliminated; see TL (Transfer Log) for new message. 
M (Mix Entries) Messge 

M has been eliminated; see MX (Mix Entries) for new message. 

MA (May Access) Message 

Syntax : 

— MA APL — <filename> — | 



Semant ics: 

MA APL makes the specified <filename> accessible to APL only, by setting the file attribute 
"APL" in the file. MA - APL denies APL access to the specified <filename> 

When <filename> is a codefile, the effect of the MA command is to allow any process running 
from that codefile to access data files which also have been restricted, via MA. Also, the 
codefile has the ability to create files with the "APL" attribute set. 

Exampl es : 

MA APL MYFILE 



GIVEN APL ACCESS MYFILE 
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MA - APL MYFILE 

DENIED APL ACCESS MYFILE 
PD MYFILE ON PACK 



FILE MYFILE on PACK ( ALGOLS YMBOL) 

DATE CREATED: Wednesday APR 09, 1979 (79099) 

DATE OF LAST ACCESS: Wednesday APR 09, 1979 (79099) 

SIZE IN SEGMENTS: 10 

SECURITY: PUBLIC-USAGE: READ/WRITE 

The file attribute APL has been implemented for disk/pack files to satisfy APL access 
restrictions. It may be set prior to the creation of a new file, and is effective only if 
the codefile creating the file itself has the attribute set. The attribute may be read any 
time the file is open. An attempt to open a file with APL set causes the requestor to be 
DSed unless it also has APL set. 

MIXL (Mixlimit) Message 

MIXL has been eliminated; see ML (Mixlimit) for new message. 

ML (Mixlimit) Message 

ML replaces the MIXL (Mixlimit) message. 
Revised Syntax: 

— -- ML - — <number>- 

- MIXL - 



Seman t i cs : 

The ML (Mixlimit) message is used to set or interrogate the current mixlimit. The system 
responds to the interrogation ML by displaying queue class, active count, mixlimit and the 
number of jobs queued for every job queue. If a default queue has been set, the letter D 
appears in the left margin of the display for that queue. A typical response to a ML 
message is as follows: 

QUEUE ACTIVE LIMIT QUEUED 

DO 2 10 

3 2 



2 


10 





2 


4 


4 


7 


NONE 



5 4 4 1 

TOTAL 

ML <number> sets the mixlimit used for introducing new jobs into the system. This message 
establishes the maximum number of jobs which may be introduced regardless of the sum of all 
mixlimits set for all queues. Setting the mixlimit equal to zero will allow no jobs to be 
run. The limits set on each queue need not be changed. 

Ex amp 1 e : 
ML 20 



QUEUE ACTIVE LIMIT QUEUED 

TOTAL 7 20 

ML- removes the mixlimit. 
Ex amp 1 e : 
ML- 

QUEUE ACTIVE LIMIT QUEUED 
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TOTAL 7 NONE 

MODE (In or Output Mode) Message 

Syntax : 

Unchanged 

Revised Semantics: 

The MODE message is used to control the input/output capability of the indicated device. 
The IN option (read only) prevents new files from being created, but it does not prevent 
writes to the given unit. Old files can be updated and/or removed even if the IN option is 
set. The IO and OUT options allow the device to revert to normal operation. The MODE 
message allows the operator to inform the MCP that the WRITE ENABLE switch on a given disk 
pack unit has been changed. 

Ex amp 1 e : 

MODE PR 096 OUT 



PRO 9 6 MODE IS OUT 

This allows files to be opened for output. 

GETUSERDISR gives a "SECTORS REQUIRED" message if a request is made for space on a write 
locked out disk pack. 

MQ (Make or Modify Queue) Message 



In addition to the pre-3.1 MQ syntax, the EQ (Eliminate Queue) option has been 
incorporated. 



Revised Syntax: 
— MQ -- — <number>- 



1 



< 



<queue attributes>- 

-<number> 



The syntax and semantics for <queue attributes) are unchanged, except as follows: 

A new attribute has been added to the list of queue attributes, 

Syntax for SUBSYSTEM: 

— /1\- SUBSYSTEM — = — <subsystem id> — | 

Semantics for SUBSYSTEM: 

The SUBSYSTEM attribute specifies the memory structures to be used for the jobs and tasks 
initiated through those queues. 

Semant i cs : 

The entry of the MQ (Make or Modify Queue) message results in the modification or creation 
of a job queue identified by the number following the MQ. 

MQ- <number> eliminates the specified queue from the system. 

Exampl e : 

MQ 37 MIXL = 2, SUBSYSTEM=REDBLUE 



QUEUE 37: 

MIXLIMIT = 2 
SUBSYSTEM=REDBLUE 
DEFAULTS : 

NONE 
LIMITS: 
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NONE 



MS (Make Subsystem) Message 



Syntax : 
— MS - 



-<subsy s t em id>- 



-<subsys tem id> ( — <processor id 1 i s t > — ) 



<processor id 1 i s t > 
< 

— GLOBAL 
_ i 

- 2 

_ 3 

_ 4 



Semant i cs : 

The MAKE SUBSYSTEM message defines a logical subsystem within a system. 

MS without qualification displays all the current subsystem definitions. 

MS <subsystem id> displays that subsystem definition. 

MS - <subsystem id> eliminates a subsystem definition. 

MS <subsystem id>=(<processor id list>) defines or redefines a subsystem. 

The limit of 12 subsystems that can be defined by the MS ODT input message has been 
removed. However, defining more than 12 subsystems will cause the JOBDESC files to be in a 
format that is not usable on previous level MCPs ; thus, defining 13 or more subsystems and 
then CMing to a previous MCP will cause removal of the JOBDESC file (note that subsystems 
SYSTEM and GLOBAL are defined by default). 



ampl e : 














MS 














MS 
MS 
MS 
MS 
MS 
MS 
MS 


SYSTEM 

GLOBAL 

TWO 

BARBARA 

RED 

YELLOW 

BLUE 


= 


(GLOBAL, 1 

(GLOBAL) 

(2) 

(2) 

(3) 

(3) 

(1) 


,2, 


5.4) 


CURRENTLY (GLOBAL, 1 
CURRENTLY (GLOBAL) 
CURRENTLY (2) 
CURRENTLY (2) 
CURRENTLY EMPTY 
CURRENTLY EMPTY 
CURRENTLY (1) 


MS JUNK = (2) 




(2) 








MS 


JUNK 


CURRENTLY (2) 


MS - JUNK 













,2) 



JUNK REMOVED 
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MU (Make User) Message 



MU incorporates the PU (Privileged User) message. 
Syntax : 

— MIJ -— < ident i f i er> -— 

I- / <identifier> -| |- PRIVILEGED - 
- — <ident if ier> — PRIVILEGED 



Semant i cs : 

The MU (Make User) message causes the first specified identifier to be entered into the 
usercli rectory as a valid usercode, and the second specified identifier (if any) to be 
associated as a password with that usercode. The usercode may be specified as a privileged 
user A usercode preceded by a minus sign has privileges removed from it. The MU action 
is subject to regulation by the "MU MODEL" entry in the SYSTEM/USERDATAFILE; MU may be 
disallowed entirely, or the PRIVILEGED option may be disabled. 

Ex amp 1 e : 

MU JOHN/DOE 



JOHN/DOE CREATED 
MU- JOHN PRIVILEGED 

JOHN NOT PRIVILEGED 

MX (Mix Entries) Message 

MX replaces the M (Mix) message. 
Revised Syntax: 

— MX 

-/1\- ALL - 



-/1\- SWAPPER 

-/1\- MCSNAME <mcsname>- 



-/1\- IN <subsystem id> 

|- ( <processor id list> ) 



(processor id list> 
< 

— GLOBAL 
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Revised Semantics: 

The MX (Mix Entries) request yields the same response as the J (Job and Task Structure 
Display) request, except that display lines (RSVP messages and DISPLAY) are printed with 
cfmnnnSc ALL ' S used > anv active jobs or tasks which have been suppressed by the 
SUPPRESS message are displayed in addition to unsuppressed tasks. 

When SWAPPER is specified, only jobs running in swapspace will be displayed. 

When MCSNAME is specified, only jobs that originated from the specified MCS will be 
di splayed . 

On a B6800 multiprocessor system, each displayed task is preceded by a subsystem indicator- 
processor id for a local memory task, "G" for a global memory task, or blank for a task 
whose subsystem location is currently unassigned. 

When IN is specified, only jobs with stacks running in the subsystem identified or the 
processor identified will be displayed. 

Ex amp 1 e : 

MX 

JOB STRUCTURE 



S4087 JOB 50 ?RUN DICKEYIN( "SUP 

4070 JOB 50? RUN DATABASE/DU 

S..L4083 50 DATABASE/DUMPANALYZER ON DMS 

4053 JOB 70 SYSTEM/CANDE 

D: DISPLAY:* 

E. .4075 60 DMALGOL ON DMS (JKD) CANDE/CODE1 100 

•S..4120 50 DMALGOL ON DMS 

3643 JOB 60 INTERIMFR26 

D: (JHHH) JHHHPATCH REMOVED ON INTERIM26 PK065 

W..4128 60 LIBRARY/MAINTENANCE 

R: RECOPY REQD: SYSTEM/FORTRAN 

D: COMPARE ERROR: MT114* 

Example : 

MX ALL MCSNAME=SYSTEM/CANDE 



I£i!™2^ 8a .8£ wM1 dis P lav al1 active jobs (including suppressed) that originated from 
a YSTEM/CANDE . 

Example: (B6800 Multi-Processor System): 

MX SW IN(3) 

This message will display all active jobs (excluding suppressed) whose stacks are 
running in swapspace and are currently swapped into processor 3. 

NET (Network) Message 



Revised Syntax: 
— NETWORK 



— = 


— 


— 'NULL 

- *DEFAULT - 
-<f i I ename>- 


- + 


*NULL 






- 'DEFAULT - 






-<f i 1 ename>- 



NOW 
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Revised Semantics: 



The SL (System Library) command is used to specify the file title of the networking 
library. See the description of the SL command for details of implementation. 

NET= specifies whether or not an initialization file is to be used when starting up 
network services . 

•NULL specifies that no initialization file is to be used. 

•DEFAULT specifies that the default initialization file (SYSTEM/NET I NUT) is to be used. 

<fiIe " ame specifies that an initialization file other than the default file is to be used. 

NET interrogates the setting of the network initialization file. 

NET+ initiates network services and optionally specifies the network initialization in 
the same manner as NET=. 

NET- terminates network services. The default (i.e., no parameters) is to initiate a 
slow shutdown which waits until all port files to remote hosts have been closed, 
after which network services is terminated. 

NET-NOW closes all port files to remote hosts and shuts down network services immediately. 
NEXT (Next Screen) Message 

NEXT has been eliminated; see NS (Next Screen) for new message. 
NS (Next Screen) Message 

Syntax : 

NS 1 

I- NEXT -I 

Semant ics : 

The function of NS (Next Screen) is to bring up the next screen on a screen »«'■{■»• [[ 
there is a next screen. The message is automatically typed in and the cursor positioned at 
the lower right corner of the screen. 

NW (Network Prefix) 

Any text preceded by the NW message is passed to the BNA network operator for »•">»« '[ 
the network is running. The CONTROLLER does not parse any th,ng beyond the NW. The 
following message is displayed if NW is entered and the network is not running: LOCAL HOST 
IS NOT NETWORKING". 

OF (Optional File) Message 

Revised Syntax: 

— <mix number list> — OF — | 

Semant ics : 

Unchanged 
Ex amp 1 e : 

Unchanged 

OG (Overlay Goal) Message 
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Revised Syntax: 

— <mix number list> — OG 



Semant i cs : 

Unchanged 
Exampl es : 



-<number>- 



4869,5269 OG 18 



4869 OVERLAY GOAL=18% 
5 269 OVERLAY GOAL=18% 

5269 OG 



5269 OVERLAY GOAL=ll% PER MINUTE 
4869 OG 20 



4869 OVERLAY GOAL=20% 

OK (Reactivate) Message 

Revised Syntax: 

— <mix number 1 i s t > — OK — | 

Semant ics : 

Unchanged 
Examples : 

0963 OK 



0931,0935 OK 

OL (Label Table) Message 

ThI h ni th Anx eW GETSTA I US l /0 P«th. j.nf° "nation interface, the path display that results from 
the OL ODT message has been mod. fled. The information displayed depends on the system type. 

New Exampl es : 

B6800, B6700 SYSTEM/CONTROLLER Path Display Modification 
A new "PATHID" column precedes the "MPX" column. 
Example ODT entry: 
OL PK192 
Di splay : 

PK 192*B [250265] #1 DATACOM (08) [1,2,3] 

CREATED ON: 04/16/80 AT 00:28:12 
BX385 235 
FIRMWARE=D484 

PATHID MPX PATH STATUS 

00 1 ONLINE 

01 1 1 ONLINE 

02 1 2 ONLINE 

03 1 3 ONLINE 
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B6900 SYSTEM/CONTROLLER Path Display Implementation 

Given the differences •-„««»• "•». h 2[ft":; t f jSl tki^dl-pi^Sd"" 1 ". MSoS^rMTOoT 

SYSTEM/CONTROLLER on a MLIP system s differen rom that aitpimyen 
Note that firmware level information is now maintained for eacn patn. 

Example ODT entry: 
OL PK50 
Di splay : 

PK 5CI*B [001640] #1 YELLOW (00) 

CREATED ON: 02/21/80 AT 07:39:18 

PATHID FIRMWARE PROC HDPPORT LEMPORT DLPNUM PATHSTATUS 
05 D484 12 2 online, 

of the controlling DLP(s). 

If there is no firmware level information, the "FIRMWARE" column is omitted from the 

di splay . 



OP (Options) Message 

OP incorporates the SO (Set Options). RO (Reset Options) and TO (Test Options) messages. 



OP 



-<opt ion 1 i st>- 
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<option list> 



— <number> 

- OPEN 

- TERMINATE 

- NOCHECK 

- LPBDONLY 

- AUTORM 

- DIAGNOSTICS 

- CDONLY 

- AUTORECOVERY 

- DUPSUPERVISOR — 

- DUPINTRINSICS — 

- AUTODC 

- NODUMP 

- CPBDONLY 

- CRUNCH 

- BACKUPBYJOBNR 

- FULLTRANSLATION - 

- NOFETCH 

- RESOURCECHECK 

- NOSUMMARY 

- DIRDEBUG 

- CATALOGING 

- NEWPERETRY 

- OKTIMEANDDATE 

- LOGPOSITIONING — 

- SERIALNUMBER 

- ARCHIVING 

- CONTROLOLDWFL 

- IORANGECHECK 

- SWAPALLJTOBS 

- NORVRSPAPERTAPE - 

- IODIAGNOSTICS 

- USECATDEFAULT 

- CATTEST 

- MCPTEST 



Semant i cs : 

The OP (Options) message displays, sets and resets options as follows: 
OP Displays all options and their respective states. 

OP <option list> Displays the options in the list and their respective states 
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OP+ Displays all options that are set. 

OP+<option list> Sets all options in the option list. 

OP- Displays all options that are reset. 

OP-<option 1 i s t > Resets the options in the option list. 

Revised Example: 

An asterisk in the following examples indicates that the option is set. 

OP 



OPTIONS 

1 OPEN 2 'TERMINATE 

3 NOCHECK 4*LPBDONLY 

5*AUTORM 6 DIAGNOSTICS 

7 CDONLY 8*AUTORECOVERY 

9 DUPSUPERVISOR 10 DUPINTRINSICS 

12*AUTODC 13 NODUMP 

1 4 *CPBDONLY 1 6 'CRUNCH 

17 BACKUPBYJOBNR 18 FULLTRANSLATION 

19*NOFETCH 20*RESOURCECHECK 

21*NOSUMMARY 22 DIRDEBUG 

23*CATALOGING 24 OKTIMEANDDATE 

25*NEWPERETRY 26*LOGPOSITIONING 

27*SERIALNUMBER 28*ARCHIVING 

29 CONTROLOLDWFL 31 IORANGECHECK 

32 SWAPALLJOBS 33 NORVRSPAPERTAPE 

43 I OD I AGNOSTICS 45*USECATDEFAULT 

46»CATTEST 47 MCPTEST 

OP + OPEN 



1 OPEN SET 
OP - 

RESET OPTIONS 

1 OPEN 3 NOCHECK 

6 DIAGNOSTICS 7 CDONLY 

9 DUPSUPERVISOR 10 DUPINTRINSICS 

113 NODUMP 17 BACKUPBYJOBNR 

118 FULLTRANSLATION 22 DIRDEBUG 

24 OKTIMEANDDATE 29 CONTROLOLDWFL 

31 IORANGECHECK 43 IODIAGNOSTICS 
47 MCPTEST 

OP - OPEN 

1 OPEN RESET 

The Mark 32 run-time system options are as follows: 
<number> 

A number appearing in this message must correspond to the number which identifies the 
option desired. (The run-time system options are not to be confused with the option 
word assigned to each job.) 

OPEN (option 1) 

When this option is set, a file-open message is displayed for each job whenever a file 
is opened. 

TERMINATE (option 2) 

When this option is set, abnormal job terminations result in an attempted program dump 
rather than a full memory dump. If this option is reset, such abnormal terminations 
result in a full memory dump. 

NOCHECK (option 3) 

When this option is set, memory dumps under both abnormal termination and FORGETCHECK 
conditions are inhibited. These dumps are automatic when NOCHECK is reset. 

LPDONLY (option 4) 
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When this option is set, all printer output files are assigned to printer backup disk. 
These files can then be printed by the AUTOBACKUP routine. 

AUTORM (option 5) 

When this option is set, the MCP automatically removes the old file when a 
duplicate-file condition occurs. When AUTORM is reset, an RM or OF message is required 
when such a condition occurs. 

DIAGNOSTICS (option 6) 

When this option is set, an RSVP message (e.g., RF DEGRADATION) is displayed at the 
console any time the reliability of a hardware unit is degraded by a set amount. 

CDONLY (option 7) 

With this option set, any job opening card input which is not internal to the jobfile is 
DSed. Also, no card reader may be labeled. 

AUTORECOVERY (option 8) 

When this option is set, a Halt/Load is attempted following all system fatal memory 
dumps (except a hung processor). DCPs and NSPs which were running prior to the 
Halt/Load are subsequently reinitialized and the AP number is restored to the value 
previous to the halt. 

If this option is reset, the above conditions do not happen. Furthermore, the mix limit 
of all queues is set to zero so that no jobs will be automatically restarted. * 

DUPSUPERVISOR (option 9) 

This option is provided for use with directory reconstruction. If a code file <file 
title> has been designated as the supervisor program by a CS message and this option is 
set, at Halt/Load time the MCP will attempt to execute a code file <file 
t i t I e>/FMLYINX<nnn> . If this option is reset, the MCP will attempt to execute the 
designated supervisor program. 

DUPINTRINSICS (option 10) 

This option is provided for use with directory reconstruction. If a file <file title> 
has been designated as the intrinsics file by a CI message and this option is set, at 
Halt/Load time the system will attempt to use as the intrinsics file the code file <file 
t i t 1 e>/<fami ly index>. If this option is reset, the code file <file title> will be used 
as the intrinsics file at Halt/Load time, regardless of the EU involved. 

AUTODC (option 12) 

When this option is set, the automatic generation of a Data Coram control stack is 
provided for when an executing job requests it. 

NODUMP (option 13) 

When this option is set, the MCP is prevented from attempting dumps to tape. Potential 

nonfatal dumps are denoted by a message at the supervisory console and logged. The 

source of a fatal dump is displayed in a system message at Halt/Load time. When this 

option is reset, dumps are taken in the normal fashion. 

CPBDONLY (option 14) 

When this option is set, all card punch output files are assigned to punch backup disk. 
These files can be punched by the AUTOBACKUP routine. 

CRUNCH (option 16) 

When this option is set, code files and backup disk files are automatically CRUNCHed 
when they are closed. Note that if this option is reset, no file can be CRUNCHed 
although the file may have been explicitly CRUNCHed by other program constructs. 

BACKUPBYJOBNR (option 17) 

When this option is set, jobs are printed by order of the job number. When reset, jobs 
are printed by order of lowest output print quantity to highest output print quantity. 

FULLTRANSLATION (option 18) 

When this option is set on B6700/B6800, B7700/B7800 systems, every logical file is 
initialized with the file attribute TRANSLATE set to FULLTRANS . This allows software 
translation whenever translation is required and hardware translation is not provided. 

On new systems, beginning with the B6900, this option will not control the default 
setting of FULLTRANSLATION, which will have a default value of FULLTRANS. 

NOFETCH (opt ion 19) 
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When this option is set, FETCH statements entered by a WFL deck are disabled. 

RESOURCECHECK (option 20) 

When this option is set, it enables tape resource management. 

NOSUMMARY (option 21) 

When this option is set, the job summary output is suppressed if no backup files are 
produced. The job summary is printed if a task terminates abnormally. 

DIRDEBUG (option 22) 

CAUTION 

This option is intended for use only by the Burroughs 
Large Systems Plant. 

CATALOGING (option 23) 

At Halt/Load time CATALOGING is tested. If it is true, CATALOGLEVEL is initialized to 
CATALOGLEVELSET; if it is false, CATALOGLEVEL is set to zero. Note that a CATALOGING 
MCP is any MCP whose CATALOGLEVEL is greater than zero. 

Note: A Halt/Load must occur after this option is set for CATALOGING to take effect. 

OKTIMEANDDATE (option 24) 

This option is used to verify that system TIME and DATE values are valid. 

Verification will be required on B6800 multiprocessor systems regardless of the option 
setting if the clock of any processor varies from that of the leader by more than 60 
seconds during the system initialization sequence. (Whenever B6800 time-of-day 
registers disagree as a multiprocessor system is initialized, they are all synchronized 
at the maximum time found in any of them.) 

When verification is required, the current TIME and DATE settings will be displayed on 
the ODT and updated whenever ADM would ordinarily be updated. The operator may enter 
"TIMEOK" to resume normal processing after resetting any invalid time or date via the 
"DR" and "TR" messages. 

NEWPERETRY (option 25) 

This option invokes a special method of repositioning the tape after a write error 
occurs on any PE tape unit. Do not set NEWPERETRY unless all PE tape controls have 
attained the following RIN level: 

CE-L3486-1 
OON-5-L2 189-6 
MECH-R2254-19 

LOG POSITIONING (option 26) 

When this option is set, the MCP will log the positioning actions of tape parity retry 
as well as the actual retries. This option should be set by a site having trouble in 
retrying tape errors; e.g., lost blocks on tape. 

SERIALNUMBER (option 27) 

When this option is set, scratch tapes will not be assigned to output tapes unless the 
SERIALNO attribute is used or the operator OUs the tape. 

ARCHIVING (option 28) 

This option enables the MCP archiving function. If this option is set and the catalog 
level of the system is greater than zero, an archive log will be created in which 
pertinent information will be stored for later processing by the SYSTEM/ARCHIVE utility. 
The name of the archive log will be "ARCHIVELOG/<dat e>/<t ime> " , where <date> and <time> 
refer to the creation date and time of the file. If the archive log is not successfully 
set up, the option will automatically be reset by the system. 

CONTROLOLDWFL (option 29) 

When this option is set, all WFL input from the ODT is treated as new WFL. This option 
affects only job syntax entered through the ODT. 

IORANGECHECK (option 31) 

This option verifies that the disk address requested for an I/O is, in fact, within the 
range of any other rows of the file. 

NORVRSPAPERTAPE (option 33) 
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When this option is set, paper tape-parity-retry action is disallowed at installations 
using the nonreversible Facit paper tape reader. 

SWAPALLJOBS (option 32) 

When this option is set, all jobs stacks are run in swapspace without forcing 
inheritance of the SUBSPACES attribute on the tasks run out of a job stack; thus, an 
installation may choose to run all job stacks in swapspace, but not other stacks. 

IODIAGNOSTICS (option 43) 

CAUTION 

This option is intended for use only by the Burroughs 
Large Systems Plant. 

USECATDEFAULT (option 45) 

At Halt/Load time, this option and cataloging are tested. If both are true, all files 
have the attribute USECATALOG set to true by default. 

CATTEST (option 46) 

CAUTION 

This option is intended for use only by the Burroughs 
Large Systems Plant. 

MCPTEST (option 47) 

CAUTION 

This option is intended for use only by the Burroughs 
Large Systems Plant. 

OT (Stack Cell Inspection) Message 

Rev i sed Syntax : 

— <mix number> — OT — <number> — | 

Scmant i cs : 

Unchanged 
Ex amp 1 e s : 

Unchanged 

OU (Output Unit) Message 

Revi sed Syntax : 

— <mix number I i s t > — OU — <output device> — | 

Semant i cs : 

Unchanged 
Ex amp 1 es : 

Unchanged 

P (Peripheral Status) Message 

P has been eliminated; see PER (Peripheral Status) for new message. 
PC (Print Configuration) Message 
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PC has been eliminated; see SC (System Configuration) for new message. 

PER (Peripheral Status) Message 



PER replaces the P (Peripheral) message. 

Revised Syntax: 

— PER 

I < , 

-<dev i ce> 



-<device>- 



<device> 

CP - 

CR - 
DC - 

- DK - 
Pit - 

- LP - 
MT - 
PP - 
PR - 
SC - 



Revised Semantics: 

When the PER (Peripheral Status) message is entered, the status of the specified peripheral 
unit(s) is displayed on the supervisory console at which the message was entered. 

If PER= or PER <device>= is used, unlabeled and not-ready devices are included; otherwise, 
they are not . 

On a B6800 multiprocessor system, the display for each unit is followed by a bracketed list 
of processor numbers showing which subsystems are connected to the unit. 

DC has been added as a device type on the B6900; it designates a datacom type device (NSP 
or LSP DLP). 

The remainder of the semantics remain unchanged. 

New Example: (B6800 Multiprocessor System) 

PER PK 



pj£ STATUS 

64 NOT AVAILABLE TO GROUP 
66 NOT AVAILABLE TO GROUP 
68*B [152000] #1 DISK (26)[1,2] 
70*B [144732] #1 PACK (02) [1,2] 
71*B [004092] #1 USERS (00) [1,2] 



PG (Purge) Message 
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PAGE 54 



idens i ty> 
— - 200 ~ 
556 — 
800 — 
1600 - 
6250 - 



Revised Semantics: 

The PG (Purge) message may be used to purge specified tape units or disk packs if they are 
ready, not in use, and are wr i te-enabled. For tapes, use of this message requires that the 
tape have serial numbers; these serial numbers are not disturbed by the message If the 
tapes in question do not have serial numbers, use of the SN message is required. The 
density of the tape may be specified; however, when the density is specified, it applies to 
all tapes in the list. ' r 

The PGL form of this message, in addition, causes the specified tape units to be locked so 
that no job can automatically pick up the scratch tapes. 

New Example: 

PG MT 82 (1600) 

MT82 WILL BE PURGED 

For disk packs the PG message causes the pack to be relabeled with the packname SCRATCH 
H'.'J'J' ? , " 1 ' 1 | to . SCR programs. This message, intended primarily for maintenance, 
should not be used for disk packs in the normal course of work. 

PP (Privileged Program) Message 



Syntax : 

pp _ r _ <fi |e title> | 

|- : TRANSPARENT 
- — <file title> 



Si-mant ics : 

The PP (Privileged Program) message designates a code file as a privileged oroeram PP 
without the TRANSPARENT option gives the program the same capability fiia. ?t wouTd ha" 
running under a privileged usercode. A code file title preceded by 
privileges removed from it. 

Example : 

PP (MIKE) OBJECT/HARD 



minus sign has 



(MIKE)OBJECT/HARD IS A PRIVILEGED PROGRAM 
PP- (MIKE)OBJECT/HARD 



(MIKE)OBJECT/HARD NON PRIVILEGED PROGRAM 
The TRANSPARENT option confers upon the code 



■ ne iKANsrAKtNi option confers upon the code file a new type of privilege called 
privileged transparent". In order to explain this feature, the interaction of code files 
vith respect to privilege needs to be clarified. 
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Each program has a code file privilege spec i ficat ion and a dynamic run-t ime privi lege. 
Formerly! the code file was marked either privileged or non-pr i v. leged . The run-t. me 
privilege was determined as follows: 

1. If a program ran under a privileged user code, it was privileged throughout its 
execut ion . 

, If „ nroirram did not run under a privileged user code, its privileged status was the 
nrivilegfa status of ?Se environment it w.. running in, which was in turn determ.ned by 
"he PP Specifications of the code file containing the environment s code. 

Exampl es : 

1. A non-privileged program which calls a privileged library was privileged while 

executing the library procedure. 
2 A privileged program which called a non-privileged library procedure was 

non-privileged while running in the library procedure. 

The above description is still true for Mark 32. However with the TRANSPARENT option . 

non-privileged users. 

Exampl es : 

1. A non-privileged program calling a privileged transparent library will be 
non-privileged in the library code. 

2. A privileged program calling a privileged transparent library will remain privileged 
in the library code. 

A code file can now have three states: 

1. Non-privileged 

2. Privileged 

3. Privileged transparent 

PP <file title> causes the program to have a normal privileged status. 

PP <file title>:TRANSPARENT causes the program to have a privileged transparent status. 

PP- <file title> cancels the privileged status of a program (either normal or transparent), 
setting it to non-privileged. The default status is non-pr i vi 1 eged. 

wi,„ n » nrivileoed transnarent program is initiated as a separate running task, its 
Sivileje Is 8 ,he privUege of'tne user code it is running under, and does not inherit any 
privilege from its ancestor. 

PR (Priority) Message 

Revised Syntax: 

— <mix number list> — PR — <number> — | 

Semant i cs : 

Unchanged 
Exampl es : 

4972, 4980 PR 90 



4975 PR 30 

PU (Privileged User) Message 

PU has been eliminated; see MU (Make User) for new message. 
QT (Quit) Message 
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Revised Syntax: 

— <mix number 1 i s t > — QT — | 

Semant ics : 

Unchanged 
Ex amp 1 e : 

682 3 QT 



RC (Reconfigure) Message 



In addition to the pre-3.1 syntax, the IV (Initialize and Verify) message has been 
incorporated. 

Revised Syntax: 

— RC PK <unit number> > 

|- DK -| I- IV -I 

>- 

I <_ 

— <parameter options>- 



<parameter options> 

-/1\- OWNER <name>- 



-/1\- NAME <packname> 



-/1\- SERIAL <inte 



ger>- 



-/1\- BP 



-<integer>- 



-/1\- FAMILYINDEX 



— <number>- 



KEEP 



-/1\- IC - 
-/1\- SR - 
-/1\- IAD 



Revised Semantics: 

The RC (Reconfigure) message is used to create a new set of volume labels on a disk pack or 
head-per-track disk. If the disk pack is to be a native mode base pack or interchange 
pack, a new master directory is also created. The IV option may be used to format and 
analyze all of the tracks of the specified pack. 

The semantics for <parameter options> is unchanged. 
RECONFIGURE Message 
Syntax : 
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RECONFIGURE INSTALLATION --- AS ---<group list> 

GROUP 1 I- DEFAULT 

INSTALLATION -- AS <ins tal 1 at ion id>- 

- DEFAULT 



Semant ics : 

rding to the groups specified 

.... . _ e 

o 
be 

reconfigured into tne new com i gui anu«. ™ .vw-.... r - -- 

groups which are being reconfigured into new groups. 

Any subset of the <group id>s defined in the configuration file may be specified in the new 
configuration. A <group id> cannot be specified more than once. 




Example : 



RECONFIGURE INSTALLATION AS THREEBY 
RECONFIGURE INSTALLATION AS SYS A, SYSB, SYSC 
RECONFIGURE GROUP AS TWOBY 
RECONFIGURE GROUP AS RED 



RES (Reserve) Message 



RES incorporates the RET (Return) Message. 
Revised Syntax: 



— RES - 

> dk — --<unit numbeo — <reserve options> 

PK - 

EU - 



- COPY ERRORS - 

I- REMOVE 

DK — <unit number> — <su or switch> 
PK 

EU 



<reserve options> 



-<su or switch>-| |- 

- AS MAINT 

- LABEL 

- SEGMENT — <number> 



AS BADDISK 



- FOR — <number> 

- THRU <number>- 

- SEGMENT - 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 GENERAL 



B6000 SERIES MARK 32 



PAGE 



58 



<su or switch> 



— SU <number> — 

- SU — <number>— r - THRU — <number>- 

|- SU 
- FOR 



SWITCH <number> 

<number>- 7 - THRU - T — <number>- 

, - SWITCH - 
FOR 



Revised Semantics: 

The RES (Reserve) message allows a specified area to be removed from or returned to the 
head-per-t rack or disk pack subsystem. 

Such an area to be reserved is placed in the IAD-disk pool or marked as a BAODISK or 
RESIDISK file. Only non-IAD disk areas may be so reserved. 

Disk areas specified as IAD-disk may be returned to the available disk pool. If an area is 
not IAD-disk, an appropriate error message is displayed and the area is not returned. If 
an area is designated as not ready or write lockout, it is not returned. 

Only one RES request can be active at any given time. 

The semantics for <reserve options> and <su or switch> are unchanged. 

Revised Example: 

RES PK 96 SEGMENT 111111 FOR 25 



1281 /JOB 99 RESERVEDISK 
and displays the following messages: 



1281 
1281 



DATA MOVED IN SYSTEM/MCP 1 1 7 

PK096 BADDISK/FMLYINX1/UNIT96/AD111111 CREATED 



Note that the files that are being affected by the copying action are displayed. 
RES- DK33 SWITCH 4 FOR 1 



3444 JOB 99 RETURNIADISK 



RESTORE (Restore) Message 

RESTORE has been eliminated; see SUPPRESS for new message. 
RET (Return) Message 

RET has been eliminated; see RES (Reserve) for new message. 
RM (Remove) Message 
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Revised Syntax: 

— <mix number> — RM — | 

Semant ics : 

Unchanged 
Ex amp 1 e : 

Unchanged 

RO (Reset Option) Message 

RO has been eliminated; see OP (Options) for new message. 
RR (Release Reader) Message 

RR has been eliminated; see SR (Secure Reader) for new message. 
RY (Ready) Message 

In addition to the pre-3.1 syntax, the RY message has been modified to accommodate 
multiprocessor systems. 

Revised Syntax: 

l< • 

RY <device> — <unit number list> 

CPU — (processor number> 

MOD — <mod number > 

|- IN <processor number> 

Revised Semantics: 

The RY (Ready) message causes the indicated devices to be made ready for use by the system 
if they are in remote status and have been made previously inaccessible via the SV message 
or rewind and lock. If the <mod number> is greater than or equal to the first mod ot 
GLOBAL tm Memory, the IN phrase is not used; global is used by default. 

An off-line processor (CPU) may also be restored by the RY message as part of the restoring 
sequence, as follows: 

a. Place the processor in LOCAL. .... , 

b. Enter RY CPU<nnn> . The system will display the following typical message: 

IC20(ZERO)30(some hexadecimal starting value); IIHF START 

c. Make sure the processor is in LOCAL. ... , . .. >. 

d. Set the B-register to hexadecimal 20. Note that everything in the registers must be 
right-just i f ied. 

e. Set the A-register to hexadecimal 0. 

f. Set AROF and BROF. 

g. Do a WRITE-IC. 

h. Set the B-register to hexadecimal 30. 
i. Set the A-register to the starting value, 
j . Set AROF and BROF. 
k. Do a WRITE-IC. 
1. Set IIHF. 

m. Set the processor to REMOTE. 

n. Make certain that SCI I , SCC1 and SCC2 are cycling, 
o. Press START. 



due 

s 



The RY CPU message cannot currently be used on B6800 or B6900 multiprocessor systems, du 
to the architecture and relationship of CPUs to I/Os in the B6800 and B6900; thi 
restriction may be removed on a future software release. 
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MT 1 1 3 READY 
RY MOD 1 1 IN 2 

MOD 11 IN LOCAL 2 WILL BE READY 

S (Scheduled Mix Entries) Message 

Rev i sed Syn t ax : 

__. s 

-/1\- ALL - 



-/1\- SWAPPER 

-/1\- MCSNAME <mcsname>- 



-/1\- IN <subsystem id> 

|- ( <processor id list> ) 



<processor id 1 i s t > 

< 

- GLOBAL 
_ J 

_ 2 

- 3 

_ 4 



Revised Semantics: 

The S (Scheduled Mix Entries) message causes a display of those tasks which are scheduled 
This display does not include jobs still in one of the job queues. 

When SWAPPER is specified, only jobs running in swapspace will be displayed. 

When MCSNAME is specified, only jobs that originated from the specified MCS will be 

(ll S p 1 a y c u • 

On a B6800 multiprocessor system, each displayed task is preceded by a subsystem indicator- 
processor id for a local memory task, "G" for a global memory task, or blank for a task 
whose subsystem location is currently unassigned. 

When IN is specified, only jobs with stacks running in the subsystem identified or the 
processor identified will be displayed. 

A typical response to an S message is as follows: 

2 SCHEDULED ENTRIES 

6950 JOB 70 SYSTEM/CANDE 
6962/6963 55 SYSTEM/DUMPANALYZER 
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suppressed entries. 
New Ex amp 1 e : 

S ALL MCSNAME=SYSTEM/CANDE 



This message wi 
SYSTEM/CANDE. 



ill display all scheduled jobs (including suppressed) that originated from 



SB (Substitute Backup) Message 



Revised Syntax: 
< 



SB — 



/1\- DISK /1\- DISK 



-/1\- PACK 

-/1\- TAPE 

-/1\- TAPE7 — 
-/1\- TAPE9 — 
-/1\- PETAPE - 



-/1\- PACK 

-/1\- TAPE 

-/1\- TAPE7 

-/1\- TAPE9 

-/1\- PETAPE — 
-/1\- DLBACKUP 



Semant ics : 

Semantics are unchanged, except for the following: 

The default SB specifications are DISK = DLBACKUP and PACK = PACK. 

Ex amp 1 e : 

Unchanged 

SC (System Configuration) Message 

SC replaces the PC (Print Configuration) message. 
Syntax : 

SC 1 

- PC - 



Semant ics : 



Wh-n the SC fSvstem Configuration) message is entered, the system responds by displaying 
The current ( system configuration at B the supervisory console from which the message I. 



entered . 

A typical response to an SC message, which y 
system, is as follows: 



ields the total configuration of a B6700 
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3 PROCESSORS 1-3 

D0=02100 
3 MULTIPLEXORS 1-3 
MPX LIMIT TRAFFIC 

1 (MOD III) 15 2 

2 (MOD III) 15 o 

3 (MOD III) 13 2 
MEMORY STATUS 

24 IN USE 0-23 
PROGRAMMED HALT/LOADS: 
STRINGS PRESENT: 1-3 

Atypical response to an SC message, which yields the total configuration of a Bfisnn 
multiprocessor system, is as follows: igurai ion of a B6800 

PROCESSORS 

PROC ID 3 AT PORT AC00 

PROC ID 2 AT PORT AB00 

PROC ID 1 AT PORT AA00 
GLOBAL SYSTEM NUMBER = 1 
D0=80100 
MEMORY STATUS 
GLOBAL MEMORY 

32 IN USE 32-63 
LOCAL MEMORY 1 

32 IN USE 0-31 
LOCAL MEMORY 2 

32 IN USE 0-31 

s y st^m? a !s r a: P ?oMows: an SCmeSSa8e ' WMch yieldS th ° t0ta ' configuration of a B6900 



SI (System Intrinsics) Message 

SI incorporates the CI (Change Intrinsics) and WI (What Intrinsics) messages. 

Syntax : 

— si — I 

+ 



-<f i le t i t le>- 



Semant ics : 

The SI (System Intrinsics) message loads or displays the system intrinsics as follows: 
SI Displays the current intrinsics. 

SI <f i le ti t le> 

Loads the intrinsics named in <file title>. 

'^illliUiVlli^ll^^lt ™^™>< '° a<^„e in theControl.er such that an 

intrins,cs a s tack rrently " tiVe "" the "° ,d " ""rin.ic. stack; new jobs use the "new" 
Esampl es : 

SI SYSTEM/X 



6029 JOB 99 INITIALIZEINTRINSICSTUFF 
then 

SYSTEM/X (LOADED) 
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SI + 

6039 JOB 99 INITIALIZEINTRINSICSTUFF 

then 

SYSTEM/INTRINSICS (LOADED) 

SI 

INTRINSICS: SYSTEM/INTRINSICS 

SL (System Library) Message 



Syntax: 
— SL - 

-<funct ion>- 



<function> = <f«le title> 



Tk"0Df ~i>". >L (S,.t«E P Libr.„) b.i b..» .*l«d to lull, thit WM' 

Semant ics : 

The MCP maintains the function mapping tables for ^he^rary l^M- "ft-J- ^sylJem 
SJm"': "°:h.\bilU r- chan^f to new ft.r.rl.. without affec ting an y ^ ^ 'unntng 
?ra?!rrharbe^ t, :*pio?ea a to n n f eJen:: y , n hnuppo^ Isles' n% t %ENERALtuPF-ORT which is 
a replacement for the intrinsics). 

* Li.. oritli the attributes LIBACCESS and FUNCTIONNAME 
IS\11X cTrently^n ALGOL^'nEw^ (s^Mark^ ALGOL^ote D3530) . 

There are several function names and associated 1 I^^S^^^'^r:?;;:!;"., 
Ill thrfun^iornLrGENERAL UPPORT* All^fuct ion names ^ffixed wi th t ;«™T b «. 
WWlVtf ft sup^r.ibr^ilrormay^^Me-^ctTo: n:mes ma h^ the' SL ODT message . 

therefo^^l S{ be'neccessa^ ^retold JKriKUSI^.fSI'ffi'lKi.a..?' "' 
The simple form of the SL message is used to interrogate the current libraries ...octed 
with the various function names. 

Ex amp 1 e : 
SL 

SL GENERALSUPPORT = SYSTEM/GENERALSUPPORT 
SL l'LISUPPORT = SYSTEM/PL1 SUPPORT 
SL USERFUNCTION = SYSTEM/USERLIBRARY 

The SL <function> message is used to interrogate the current library associated with a 
specific function name. 

Ex amp 1 e : 
SL GENERALSUPPORT 



SL GENERALSUPPORT = SYSTEM/GENERALSUPPORT 
The SL <f»nction> = <filetitle> is the message used to initialize the various functions or 
To change tVe specification of a function which is already in use. 

If a function specification is changed to a differ... ^brary all tasks P-sent.y gunning 
Inould-oe a ^H^:raftet n chanIi»g S a S f:nc!ior S ^i??Iai!on? In tasks wi.Aestart using 

the new library. 
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FUNCTION "USERFUNCTION = SYSTEM/USERLIBRARY" ESTABLISHED 

The SL - <function> message will remove a function specification from the MCP tables. 

»wl! a . fu "ct'on specification has been removed, all running tasks will continue running 
with the old library. Any new tasks will receive a FILE NOT FOUND error. running 

Example : 
SL - USERFUNCTION 



FUNCTION "USERFUNCTION" IS NO LONGER ESTABLISHED 
SM (Send Message) Message 
Revised Syntax: 
— <mix number list> — SM <control message> — 



Soman t i cs : 
Unchanged 

Example : 

Unchanged 



SN (Serial Number) Message 

The SN (Serial Number) message now allows the specification of tape density. 
Revised Syntax: 

— -- SN — -- MT — <sn option list> I 

|- SNL -| |_ ( — <density> — ) -| 



<sn opt ion 1 i s t > 

< 



-<unit number list> 



/6\ <digi t> 

I -< 1 e 1 1 er>- I 

I < 

- " /6\ <digit> — 

| -<le 1 1 er>- 



<dens i ty> 

200 — 

556 — 

800 — 

- 1600 - 

6250 - 
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The SN (Serial Number) message is used to purge (with optional locking) and assign a serial 
number a laie unit The ierial number may consist of up to six alphanumeric characters. 
If a number is used t is right justified with leading zeros added. Any serial number 
conta?n?ng a pSabeiic characters or any quoted alphanumeric string is eft J»?t.f«ed w. h 
bailing blanks. The density of the tape may be specified; however, .«: appl.es to all 
tapes in the list. 

When the SNL form of the message is used, the tape is locked as well as purged so that no 
job can automatically pick up the scratch tape. 

New Example : 

SN MT 82 MIKE (1600) 



MT8 2 WILL BE SN-ED 
P MT 



82*P [MIKE ] 1600 #1 1:00 S C R A T C H 
An attempt to SN a tape that has been locked causes the UNIT LOCKED message to be 
di spl ayed. 

SO (Set Option) Message 

SO has been eliminated; see OP (Options) for new message. 
SP (Show Print Queue) Message 

Syntax : 

Unchanged 

Revised Semantics: 

response to the SP ODT message. 



Jobs waiting to be punched will now be displayed in re 
Formerly, only jobs waiting to be printed were displayed. 



SQ (Show Queue) Message 

Syntax : 

Unchanged 
Revised Semantics: 




head of the queue. 

Ex amp 1 e : 

SQ 

QUEUE 5 (FIRST OF 3 ENTRIES) : 

7597 00 ?JOB X; 
QUEUED: OCT 30, 1979 AT 09:29:11 
QUEUE 7 (FIRST OF 4 ENTRIES): 

6627 80 ?JOB A; 
QUEUED: OCT 30, 1979 AT 09:21:32 
QUEUE 4: 

NO ENTRIES 
QUEUE 0: 

NO ENTRIES 



When a number appears in the SQ message, the system responds by displaying the numbers 
and first card image of all jobs in the designated queue. 



Exampl e : 
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SQ7 



QUEUE 7: 

6627 80 

QUEUED 

6631 80 

QUEUED 

6629 00 
QUEUED 

6630 00 
QUEUED 



?JOB A; 

OCT 30, 1979 AT 09:21 :32 
?JOB D; 

OCT 30, 1979 AT 09:21:37 
?JOB B; 

OCT 30, 1979 AT 09:21:39 
?JOB C; 

OCT 30, 1979 AT 09:22:01 



A fetch specification associated with a job is displayed as follows: 



SQ4 



QUEUE 4 (SINGLE ENTRY): 
F133 00 ?JOB A; 
QUEUED: OCT 30, 1979 AT 13:15:22 

I f two numbers appear, all entries in the queue indicated by the first number with 
priority equal to the second number are displayed. 

Ex amp I e : 

SQ7 80 

QUEUE 7, PRIORITY 80: 

6627 80 ?JOB A; 

QUEUED: OCT 30, 1979 AT 09:21:32 

6631 80 7JOB D; 

QUEUED: OCT 30, 1979 AT 09:21:37 

SR (Secure Reader) Message 

SR incorporates the RR (Release Reader) message. 

Revised Syntax: 

— SR — CR — <unit number list> — I 



Revised Semantics: 

The SR (Secure Reader) messages causes the system to check the usercode/pas sword 
combination and reject all card decks entered into the indicated card reader which do not 
contain a USER system control card. If SR- is entered, the security restrictions imposed 
on the indicated card reader by a prior SR message will be removed. 

SR CR10 

CR10 SECURED 

If an attempt is made to enter a deck without a USER system control card, the system 
responds with the typical message: 

0941 CONTROL CARD ERROR 

SR- CR10 



CR10 RELEASED 

ST (Stop) Message 

Rev i sed Syntax : 

— <mix number list> — ST 
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Semant i cs : 

Unchanged 
Example : 

Unchanged 

SUPPRESS (Suppress) Message 

SUPPRESS incorporates the RESTORE message . 

Revised Syntax: 

— <tnix number list>— SUPPRESS -- -- 



Semant i cs : 

j ob mi x 



The SUPPRESS message prevents indicated jobs from appearing in a di sp ay of the job m 
when they are active. If SUPPRESS- is entered, the suppression is lifted. Only a m 
(eg., A,C,J) message containing the ALL qualifier may cause such jobs to appear in the mi 
di spl ay . 
If an active suppressed task goes into a waiting state, it is displayed. When it returns 



to an active state, it is again suppressed 
Ex amp 1 e : 

180 SUPPRESS 



-ACTIVE ENTRIES- 



180 JOB 70 SYSTEM/CANDE 

193 70 STACK2/CANDE 

179 JOB 80 DCP/0 

results in 

ACTIVE ENTRIES 



180x 193 70 STACK2/CANDE 
179 JOB 80 DCP/0 

SV (Save) Message 

In addition to the pre-3.1 syntax, the SV message has been modified to accommodate 
multiprocessor systems. 

Revised Syntax: 

SV <device> — <unit number 1 i s t > 

CPU — <processor number> 

MOD — <mod number> 

|- IN <processor number> 

Revised Semantics: 

Thp SV fSavel messaee is provided to allow a unit to be made inaccessible to the system. 
If thl <mod Humberts greyer than or equal to the first mod of • GLOBAL tm Memory, the IN 
phrase is not used; global is used by default. 




unchanged until an RY message is entered for that unit. 
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The SV message may also be used to take a memory module off-line. The restrictions are 
that this message may not reference a module which is already saved or off-line, may not 
reference module #0, and may not reference the numerically highest module which was on-line 
at the time of the last Halt/Load. An arbitrarily long period of time may expire between 
the input of the SV message and the time the module becomes completely saved- all in-use 
areas must be returned to the system before the process is complete. A system message is 
issued when the module is off-line. e 

The SV CPU message cannot currently be used on B6800 or B6900 multiprocessor systems due 
to the architecture and relationship of CPUs to I/Os in the B6800 and B6900- this 
restriction may be removed on a future software release. 

Revised Example: 

SV MT 114 

MT 114 SAVED 

MT STATUS 

114»P [000001] SAVED 

SV MOD 1 1 IN 2 

MOD 11 IN LOCAL 2 WILL BE SAVED 

H 4 ?T OCeS? ? r i. (C r U) ma l b ! t - ke 1 %U~l in * by the SV Cp U< n nn> message once the CONDITIONAL 
HALT switch for the desired CPU has been turned on. In order To save one CPU, the other 
CPUs in a multiprocessor system must be on-line. Use the following procedure to save a 

a. Put the CONDITIONAL HALT switch in the up position. If the switch is up, OFF is 
displayed on the MDL panel in the A register. If the switch is not up, the system 

r e SpOnQS Wl ill 

SET CONDITIONAL HALT SWITCH FOR CPU<nnn> 

b. Enter SV CPU<nnn> 

c. Put the processor in local mode and CLEAR (CL) the unit. 

Note: The processor must remain in local mode; if it is in remote mode, the 
next Halt/Load will pick up the processor. 

SW (Swapper) Message 



Revi sed Syntax : 
— SW 



CREATE ON — <packname> <create options>- 



|-<processor id list> 

I < I 

< swapper parameters) 



-<processor id list>- 



<c r ea t e opt ions> 

/1*\- AREAS = <value> 

-/1*\- AREASIZE = <value> - 
-<file attribute equations 
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<processor id 1 i s t> 
< 

I < - 

2 - 

3 - 

4 



<swapper parameters) 
CORES IZE 

EXPMAXCORE 

EXPRESSRESERVE — 

EXPTIME 

IOBIAS 

- MAXCORE 

- MAXIOSIZE 

- MAXSLICENUMBER — 

MEMORYBIAS 

MINCHUNKSIZE 

MINTIMESLICE 

PRIORITYBIAS 

- RATIO 

UTILIZATIONBIAS - 

- SWAPTRANSTATE 

- NOSWAPTRANSTATE 

- FAMILY + <packname> 



<new value> 1 



See the ODT Reference Manual (Form No. 5001704) for a description of <swapper parameters;.; 
see MCP-GENERAL note 1)3054, "SWAPPER Enhancements" for a description of Mark 32 changes to 
the SWAPPER mechanism. 

The CREATE option of the SW ODT message is used to create new SYSTEM/SWAPDISK files. The 
text of the input message is compiled by WFL (using TASK. FILECARDS format) to produce the 
attribute equation for the creation of the swapdisk file; thus, any combination of 
permi sisable file attributes can be easily specified. 

Since the MAXRECSIZE of the swapdisk file is set to 1320 (44*30, one slot), the AREASIZE 
attribute specifies the number of slots per row. 

Ex amp 1 e : 

To create a swapdisk file of 20 rows of 100 slots each on family KSID, enter the 
foil lowing : 

SW CREATE ON KSID AREAS=20 .AREAS IZE= 100 

If this file were only to reside on the base pack of a multi-member family, enter the 
f o I lowing : 

SW CREATE ON KSID AREAS=20 .AREAS IZE= 100 , FAMILY I NDEX= 1 

The value of the MAXCORE parameter is now permitted to exceed 132. When a single subspace 
exceeds the value of the MAXIOSIZE parameter, SWAPPER does more than one I/O operation to 
transfer the subspace to or from disk. When writing subspaces to disk, SWAPPER uses the 
MAXIOSIZE parameter and the current size of the subspace to determine the number of I/O 
operations to be performed, after which the subspace is fit into <n> evenly sized pieces. 
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Ex amp 1 e : 

If MAXIOSIZE=60, MAXCORE=300: 

A 60-slot subspace would be written in a single I/O; 

a 61-slot subspace would be written in two I/Os, one of 31 slots and one of 30 slots. 

A new SWAPPER parameter, NOSWAPTRANSTATE , has been implemented. When NOSWAPTRANSTATE is 
set, any task that is in transaction state and exceeds its time slice is given another time 
slice. If the option SWAPTRANSTATE is set (this is the default), a task is time-sliced 
regardless of whether it is in transaction state. 

On Mark 31 and earlier releases, the swapspace was required to be a single contiguous piece 
of memory. On Mark 32, the swapspace is now permitted to be any number of pieces of 
memory. These "chunks" may be located anywhere in memory. Even though the swapspace can 
be divided into several different pieces, each individual subspace must still reside in a 
contiguous area of memory. A segmented swapspace may not be able to handle the same number 
of tasks as a non-segmented swapspace with the same number of slots. 

Ex amp 1 e : 

A swapspace with one chunk of 90 slots could run 3 tasks of 30 slots each 
simultaneously; a swapspace with a 50-slot and a 40-slot chunk can run at most two 
30-slot tasks simultaneously. 

To control this situation, a new parameter, M I NCHUNKS I ZE , has been implemented, which 
specifies the smallest amount of memory that a single chunk of swapspace may contain 
(MAXCORE <= M I NCHUNKS I ZE) . By setting the MINCHUNKSIZE attribute to the value of the 
CORESIZE attribute, behavior similar to that implemented in Mark 31 and earlier releases 
may be obtained. 

The semantics of the CORESIZE attribute remain unchanged from previous releases; however, 

the semantic effects of dynamically changing this attribute have been changed on the Mark 

32 release. At any time the amount of swapspace actually in use can be determined from the 
value displayed next to ACTUALCORESIZE in response to the SW ODT message. 

By setting the value of the CORESIZE parameter greater than the current value of 
ACTUALCORESIZE, SWAPPER attempts to expand the amount of swapspace available by getting one 
or more "chunk's of memory and inserting these into SWAPPER'S tables. These new chunks of 
memory are constrained by the value of the MINCHUNKSIZE parameter. If the difference 
between the new value of CORESIZE and the current value of ACTUALCORESIZE is less than 
MINCHUNKSIZE, no increase in swapspace will be performed. 

By setting the value of the CORESIZE parameter smaller than the current value of 
ACTUALCORESIZE, SWAPPER attempts to shrink the amount of swapspace available by shrinking 
or removing indvidual chunks of memory. No chunks of memory may be smaller than the 
MINCHUNKSIZE parameter. In some situations, SWAPPER is unable to shrink the swapspace as 
small as desired (SWAPPER never shrinks the swapspace smaller than CORESIZE). The current 
algorithm for deciding which pieces of swapspace are to be shrunk or discarded is to pick 
the smallest chunks first. 

At initialization time, if SWAPPER is unable to obtain the amount of swapspace specified by 
the CORESIZE parameter, an RSVP is issued notifying the operator of the situation. The 
operator has four alternatives: 

1. Reply DS to the RSVP, aborting SWAPPER i ni t i a 1 i za t on . 

2. Reply OK, causing SWAPPER to again attempt to find the required memory (this is done 
per iodi ca 1 I y ) . 

3. Reply NOTOK, causing SWAPPER to continue initialization using whatever memory it has 
already obtained. 

4. Enter a new value for the CORESIZE parameter using the SW ODT message. SWAPPER 
attempts to obtain the new amount of memory. 

A sample of the new format for displaying SWAPPER parameters is the following: 

SW ** RUNNING ** CORESIZE=90 SLOTS (89100 WORDS) 

SW ACTUALCORESIZE=90 SLOTS (89100 WORDS) MINTIME=3 SECONDS 

SW MAXSLICENR=7 RATIO=2 MAXCORE=50 SLOTS (49500 WORDS) 

SW MAXIOSIZE=50 SLOTS (49500 WORDS) 

SW MINCHUNKSIZE=50 SLOTS (49500 WORDS) EXPRESERVE=0 SLOTS (0 WORDS) 

SW EXPMAXCORE=0 SLOTS (0 WORDS) EXPMAXTIME=0 . 75 SECONDS 

SW PRIORITYBIAS=0 UTILIZATIONBIAS=6 IOBIAS=0 MEMORYBIAS=0 

SW NOSWAPTRANSTATE ON SWAPPACK ON KSID 

The initial item "** RUNNING **" is an indicator of the current status of SWAPPER; the 
values range from NOT RUNNING to INITIALIZING or SHUTTING DOWN. 

"ACTUALCORESIZE" is an indicator of the amount of swapcore actually being used by 
SWAPPER (see "Changing the Swapspace Size via the CORESIZE Parameter" for semantics). 

B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 GENERAL 



PAGE 7 1 
B6000 SERIES MARK 32 

"NOSWAPTRANSTATE" indicates that the NOSWAPTRANSTATE option is set (see "SWAPTRANSTATE, 
NOSWAPTRANSTATE PARAMETERS " f o r s eman t i c s ) . 

"ON SWAPPACK ON KSID" indicates that SWAPPER is using the SYSTEM/SWAPDISK files on the 
packs SWAPPACK and KSID on which to swap. 

TD (Time tmd Date) Message 

TD incorporates the WD (What Date) and WT (What Time) messages. 
Syntax : 

— TD — | 

Semant i cs : 

When the TD (Time and Date) message is entered, the system responds by displaying the 
current time and date in the following manner: 

DATE IS MONDAY APR 23,1979 (79113) hh:mm:ss 

where hh, mm and ss arc digits denoting hours, minutes and seconds respectively; 79113 
indicates the year is 1979 and the date is day 113. 

TD (Tape Directory) Message 

TD (Tape Directory) has been replaced by TDIR (Tape Directory); see TDIR for new message. 
TDIR (Tape Directory) Message 

Syntax 



TDIR <unit number>- 



SPO 

PUNCH - 



-<tape name>- 



Semanit ics : 

TDIR (Tape Directory) message initiates SYSTEM/FILEDATA, which reads the directory of the 
specified tape. The default output is to the printer. As many intermixed tape names or 
unit numbers as desired may be specified, each being separated from the next by commas. 



Ex amp 1 e : 

TDIR SPO X 



B6700 SYSTEM 277 REPORT OF 06/09/75 AT 09:48:01 

VERSION 2.7.380 

TAPE = X/FILE000. ON UNIT 115 

SERIAL#=123456 CREATED 6/09/75 

9-TRACK (PE) 1600 BPI 

•SYSTEM/DUMPALL 

TAPED I RECTORY INPUT WAS: 
"TPDIR SPO X" 



TERM Message 



A new option, FULLPAGE, has been added to the TERM message. 
Revised Syntax: 
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LINES - 7 -<number>- 

WIDTH 

FIRST 

TRUNCATE — TRUE - 

MESSAGES -| |- FALSE 

RESPONSE NONE — 

- CONCISE 



FULLPAGE 



EXPANDED 

TRUE 

FALSE 



Revised Semantics: 

The FULLPAGE option, when TRUE, decreases the time for writing a page of information to 
Burroughs TD8S0 ODTs . The default setting is FALSE; terminals are not affected unless the 
option is explicitly set. 

THAW Message 

Syntax : 

— <mix number list> — THAW — | 

Semant ics : 

The THAW message allows an operator to change libraries which are frozen permanently to 
temporary libraries. In the past, the only way to terminate a permanent library was to DS 
it. 

TI (Times) Message 

Revised Syntax: 

— <mix number list> — TI — I 



Semant ics : 

The response to the TI ODT message now includes 
account ing . 

Ex amp 1 e : 

5285 TI 



the task's READYQ time and PBIT time 



TIMES FOR 5285 

PROCESS = 00:00:37 

IO = 00:00:01 

READYQ = 00:00:56 

INITPBIT = 00:00:06 3271 OPERATIONS 

OTHERPBIT = 00:00:02 1521 OPERATIONS 

ELAPSED = 00 : 1 1 : 40 



TL (Transfer Log) Message 

TL replaces the LR (Log Release) Message. 
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Syntax : 
— TL — | 

Semant i cs : 

A new system log is generated by entering a TL (Transfer Log) message. 

The previous log is named: 

SUMLOG/<sys t em number >/<mmddyy>/<number> 

as appropriate (where number is a log serial number from 1 to 999999) and may be saved or 
discarded as desired. IAD logs specified at cold start time do not have a new log file 
created; instead, the rows of the system log are rotated. A typical response to a TL 
message is as follows: 

7275 SVSTEM/SUMLOG CHANGED TO SUMLOG/227/053075/000005 ON DISK DK033 



TO (Test Option) Message 

TO has been eliminated; see OP (Options) for mew message. 
UA (Unit Available) Message 

UA has been eliminated; see UR (Unit Reserved) for new message. 
UL (Unlabeled) Message 



Revised Syntax: 

— <mix number list> — UL <device> — <unit number> — | 



Semant ics : 

Unchanged 
Example : 

Unchanged 

UR (Unit Reserved) Message 

UR incorporates the UA (Unit Available) message. 

Syntax : 

Syntax : 

— UR <device specifier list> — | 



<device specifier list> 

|< . I 

<device> <unit number list> 

|- <device> <unit number> MPX <mpx no> PATH <path no> 

|- PATHID <pathid no> 
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Semant ics : 



The UR (Unit Reserved) message is used to reserve a unit to allow FE maintenance to be 
performed. The unit is no longer available for assignment. When a path is specified, only 
the path is reserved, not the unit. For B6700 and B6800 systems, the path is specified by 
either MPX PATH or PATHID (blanks are required between MPX and <mpx no> and between PATH 
and <path no>. For B6900 systems, only PATHID is accepted; any attempt to use MPX PATH is 
rejected with an "INVALID SYNTAX" message. The unit may be restored to the system by 
enter ing UR -. 

Exampl es : 

UR PK 108 MPX 2 PATH 4 
UR PK 108 PATHID 14 
UR- MT 18 PATHID 12 

Disk pack types 206 and 207 may be reserved and placed into maintenance mode by entering 
"UR PK <unit no> MAINT" . They may be made available and removed from maintenance mode by 
entering "UR- PK <unit no> MAINT 1 '. If the unit is not already reserved, entering "UR- PK 
<unit no> MAINT" will remove the unit from maintenance mode. If an I/O error occurs 
because a 206 or 207 disk pack is in maintenance mode, the error message displayed at the 
ODT is "UNIT IN MAINTENANCE MODE". 

Examples (for B6700, B6800 systems only) 

UR LP13 



LP 13 RESERVED 
UR DK069 MPX 1 PATH 2 

DK069 MPX1 PATH2 RESERVED 
UR- DK 097,098 



DK097 AVAILABLE 
DK098 AVAILABLE 

UR PK200 MAINT 



PK200 PLACED INTO MAINTENANCE MODE 
PK200 RESERVED 

OR- PK 206-208 MAINT 



PK206 TAKEN OUT OF MAINTENANCE MODE 

PK206 AVAILABLE 

PK207 TAKEN OUT OF MAINTENANCE MODE 

PK207 AVAILABLE 

PK208 TAKEN OUT OF MAINTENANCE MODE 

PK208 AVAILABLE 

If the unit is already available, le system responds as follows: 
UR- PK096 



IS NOT RESERVED 
If the unit is disk pack type 225 or 23S and is reserved, the system responds as follows: 
UR- PK096 MAINT 



PK096 AVAILABLE 



If the unit is disk pack type 22S or 23S and is not reserved, the system responds as 
f ol 1 ows : 

UR- PK096 MAINT 



PK096 IS NOT RESERVED 
If the unit is disk pack type 206 or 207 and is reserved, the system responds as follows: 
UR- DK206 MAINT 



TAKEN OUT OF MAINTENANCE MODE 
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DK206 AVAILABLE 



If the unit is disk pack type 206 or 207 and is not reserved, the system responds as 
f ol lows : 

UR- DK207 MAINT 

TAKEN OUT OF MAINTENANCE MODE 
W (Waiting Mix Entries) Message 



Rev i sed Syntax : 

__ w 

|-/1\- ALL -| 

>- 

| < 

.___/! \_ SWAPPER 

-/1\- MCSNAME <mcsname>- 



-/1\- IN <subsystem id> 

|- ( <processor id 1 • s t > ) 



<processor id list> 

<— - 

— GLOBAL 

I 

2 

_ 3 

4 



Revised Semantics: 

The W (Waiting Mix Entries) message causes a display of those tasks which require operation 
action in order to continue; i.e., those suspended on an RSVP condition. The reason for 
suspension is included in the display. 

When SWAPPER is specified, only jobs running in swapspace will be displayed. 

When MCSNAME is specified, only jobs that originated from the specified MCS will be 
di splayed. 

On a B6800 multiprocessor system, each displayed task is preceded by a subsystem indicator: 
processor id for a local memory task, "G" for a global memory task, or blank for a task 
whose subsystem location is currently unassigned. 

When IN is specified, only jobs with stacks running in the subsystem identified or 
processor identified will be displayed. 

A typical response to a W message is as follows: 

1 WAITING ENTRIES 

3570/3571 50 LIBRARY MAINTENANCE 
1100 SECT REQ ON MCPMAST PK068* 



the 



Swap jobs are flagged with an "#" between the priority number and the file name. Th 
number in the waiting entry heading is the total number of waiting entries includin 
suppressed entries. 



The 

g 
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New Example : 

W ALL MCSNAME=SYSTEM/CANDE 

This message will display all waiting jobs (including suppressed) that originated from 
SYSTEM/CANDE. 

New Example: (B6800 Multi-Processor System): 

W SW IN(3) 



This message will display all waiting jobs (excluding suppressed) whose stacks are 
running in swapspace and are currently swapped into processor 3. 

WD (What Daie) Message 

WD has been eliminated; see TD (Time and Date) for new message. 
WI (What Intrinsic) Message 

WI has been eliminated; see SI (System Intrinsics) for new message. 
WM (What MCP) Message 

Syntax : 

Unchanged 
Semant ics : 

Unchanged, except as follows: 

A typical response to the WM message is: 

MCP: SYSTEM/MCP 31.200.900 

H/L UNIT: 64 

COMPILED: 3/22/79 6 16:27:48 (NEWP 31.197) 

COMPILE TIME OPTIONS ARE: 

D I AGNOST I CS D I SKCHECK MTBF 

LINE INFO LOCKTRACE 

REVERSEPAPERTAPE SWAPTRACE 
H/L REASON: MANUAL 
GROUPID: ONEBY 
HOSTNAME: BLUE 
SYSTEM SERIAL NO: 277 
CATALOG LEVEL: 
NEXT MCP: NOT SPECIFIED 

WS (What Supervisor) Message 

WS has been eliminated; see CS (Change Supervisor) for new message. 
WT (What Time) Message 

WT has been eliminated; see TD (Time and Date) for new message. 
XS (Exceed Schedule) Message 

XS has been eliminated; see FS (Force From Schedule) for new message. 

Y (Status Interrogate) Message 

Syntax : 

Unchanged 
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Seman tics: 




lg 
appropriate display is also shown 



The display now includes the usercode if the task is running with a usercode. 
PRIMITIVE Messages 

The following "primitive" messages have been added or modified. 
??CM 
— ??CM <filename> — | 

- # -I 



This feature allows changing to a new MCP wi thout changing the disk *>£*•»■£; ™ ur ? tie 
is effective immediately (even if the mix i s non-empty) . If a Halt/Load occurs, tne 
previous MCP is loaded, since it is pointed to by the disk bootstrap. 

If the "#" character is omitted, the disk bootstrap is changed and the CM is permanent 



(until the next CM). 
??DUMP 

__ ?? DUMP 1 

|-<mix number>- I |- DP | 

The 77DUMP message will invoke a non-fatal memory dump (through the MCP procedure KEYIN) . 

??FS 

__ 77 FS 1 

|-<mix number>-| |- XS -| 

The ??FS message causes the execution of the indicated scheduled job. If ??FS is used 
without the mix number, all scheduled jobs are executed. 

??HS 

__ 77 HS 1 

I- EI -I 

immediately following a Ha It /Load. 
D3 396 GENERAL - "LISTNOTES" CHANGES 

Some of the changes include the following: 

1. Default line printer file is EBCDIC96 

2 Default reports are 'FINAL'; i.e., no sequence numbers 

I Silo" to ?on^rrL?e! e to 'NEW^°(ty P pe a ^oaai:rn!es and removing headings, footings, etc. 
Operating Instructions 
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Remote Use (via CANDE) 

E LISTNOTES ; FILE IN = X 

E LISTNOTES; VALUE CN ; FILE IN = X 

Batch Use 

RUN OBJECT/LI STNOTES ; FILE IN = X 

RUN OBJECT/LISTNOTES ; VALUE CN ; FILE IN = X 

The allowable values of 'N' in VALUE = CN are shown in the following table: 

N FINALTOG UPPER % UPPERCASE MAKETOG PRINTER 

LOWERCASE ONLY OUTPUT 

T T F F T 

1 T F T F T 

2 F T F F T 

3 F F T F T 
9 T F F T F 

C = (DEFAULT) PROCESS ALL RECORDS IN THE FILE 
C = 1 PROCESS ONLY PAGES WITH PCN ' | ' MARKS 

N = FINALTOG TRUE, PRINT IN UPPER AND LOWER CASE (DEFAULT VALUE) 

N = 1 FINALTOG TRUE, PRINT ALL IN UPPER CASE 

N = 2 FINALTOG FALSE, PRINT IN UPPER AND LOWER CASE 

N = 3 FINALTOG FALSE, PRINT IN UPPER CASE 

N = 9 FINALTOG TRUE AND CREATE 'DP/NEWS/X' FILES 

FINALTOG TRUE (N = OR N = 1) 

The notes are printed in the center of the page without line numbers and sequence numbers 
FINALTOG FALSE (N = 2 OR N = 3) 

The notes are printed in the center of the page with line numbers on the left and two pairs 
ot sequence numbers on the right: the first sequence number on the right is from the 

num^r^is £ „ *{*£* f"?nn "J" '° V" "'I*'' " V° i0 tMt edUor = the s "°» d sequence 
•™ " fi .1 iJil&rrSl '°0 «nd may be used as the sequence number to locate records in the 
input file to LISTNOTES, which is of type 'CDATA' . 

UPPER & LOWER CASE (DEFAULT) 

The records are printed on the file LINE with TRAINID=EBCDIC96 . The records are not 
translated to uppercase. 

UPPER CASE ONLY (N = 1 OR N = 3) 

EBCDIC72 fdS are translated to "PPercase and printed on the file line with TRAINID = 
PCNSTOG (C = 1 , N = , 1 , 2 OR 3 ) 



On|y pages which have records wi th the PCN (publication change notice) flag »|' are 
printed. This option may be used to print field update notes. 

MAKETOG (N = 9) 

This option processes the file 'IN = X' and creates the following files: 

1 . DP/NEWS/X 

2. DP/NEWS/ I NDEX/X 

3. DP/NEWS /CONTENTS /X 

Each file is type "SEQDATA' 

Inil If!!??-! I" A** fi,e " X " are converted to a file of type 'SEQ'. All headings, footings, 
and section headings are removed. Two or more consecutive blank lines are also removed. 

The "INDEX 1 file contains 



llie IN"** file contains a record for each software item and contains the sequence numbers 
ot the first and last record in the 'NEWS' file for the corresponding software item. It 

!° f ?°" a ' ns one . re ?S rd . 1 f,2i re ea <: h , D - note and P-note together with the sequence number of 
the first record in the 'NEWS' file for the corresponding note. 

™»':.,i!! EWS ' f i , u, may i- be V Sed - *° extract portions of the system notes for publishing (in 
"cANDE/NEWS ? Hie It"c system users. Ext ract i ng the CANDE D-notes could create a 
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The 'CONTENTS' file contains the table of contents for the system notes. 
LABEL EQUATION, FILE IN = X 



The input file is specified with the label equation: 



FILE IN = <f i le ti tle> 



Versions of LISTNOTES released prior 
= X' . An attempt to use this 
correct label equation, as follows: 



to June 1980 required the label equation 'FILE .DISKIN 
label equation results in a warning to re-run with the 



•THE LABEL EQUATION: 'FILE DISKIN = X' 
WAS USED WITH THE OLD VERSION OF THIS PROGRAM 
PLEASE USE: 'FILE IN = X' 
PLEASE NOTE THE TASKVALUES HAVE ALSO BEEN CHANGED 

The options specified by the task value have also been changed from the previous releases. 
D3572 GENERAL - "PBIT" TIME ACCOUNTING 
As par, of an on-going program to reduce the number of comp i le-t ime oPj"»«, , ^ ^g^on 
HVZlt ^r^se^Ar? a r?Tm ?\S: 1 ™ESENCEBITCHARGED b compnUim: P t on" ii he^CP will 

" a? ow timely mod. ficaTioS to installation accounting programs. Dur.ng thu .nerval, use of 
the PRESENCEBITCHARGED feature will yield the same results as on previous releases. 

For moire detail concerning the new implementation, refer to MCP note D3573. 

D3650 GENERAL - IMPLEMENTATION OF PORT FILES 

Communication between processes can now be performed through the standard input/output 
communication "i»«" v «*- IfTNr ,_ pnl , T Additional file attributes, parameters to the open 
and" loL funclion and° ang^gfclnstrucls inAlioL? FORTRAN, PL/? and COBOL have been 
defineS to p ov?de Access" to this facility. This note describes the genera por t f . 1 e 
facility, while the specific interface defined for each language is described in a 
separate note for each language. 

Use of Attributes 




the file. 
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Fi le Attribute Notes 



BLOCKSTRUCTURE File 

CENSUS File, Subfile 

CHANGEDSUBF I LE File 

CHANGEEVENT File, Subfile 

CURRENTRECORD Subfile 

FILESTATE Subfile 

FRAMESIZE File 

INPUTEVENT File, Subfile 

INTNAME File 

LASTSUBFILE File 

MAXCENSUS Subfile 

MAXRECSIZE File, Subfile 

MAXSUBFII.ES File 

MYNAME File 

OUTPUTEVENT Subfile 

SECURITYTYPE File 

STATE File 

SUBFILEERROR Sub f i 1 e 

TITLE File 

YOURNAME Subfile 

YOURUSERCODE Subfile 
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Attributes that are only file attributes may be accessed or assigned by not speci f y ing a 
subfile index. If a subfile index is specified for a file attribute access or 
assignment, an attribute error is generated. 

Those attributes which are only subfile attributes can be assigned for a particular 
subfile bv providing a subfile index. If a subfile index of zero is specified, the 
^tribute assignment applies to all subfiles in the file. If MAXSUBFILES •• «<«•» ° 
one, the subfile index may be omitted; the attribute assignment wi 1 1 apply to the _ only 
subfile When accessing a subfile attribute of a particular subfile, the subfile index 
must be specified if MAXSUBFILES is greater than one. If MAXSUBFILES is equal to one, 
the subfile index may be omitted; the attribute access will apply to the only subtile. 
If a subfile index of zero is specified for an attribute access, an attribute error is 
generated . 

For attributes that are both file and subfile attributes, if a subfile index is not 
specified, the attribute access or assignment applies to the file; otherwise tne 
attribute access or assignment applies to the subfile. 

The null value for all string-valued attributes is ".". 

The following attribute descriptions apply to port files: 

BLOCKSTRUCTURE 

The BLOCKSTRUCTURE values of FIXED and EXTERNAL apply to port files , the default 
being FIXED. BLOCKSTRUCTURE is meaningful only for READ operations. it 
BLOCKSTRUCTURE is equal to FIXED, the user's buffer is blank f, Ji ed - } f 
BLOCKSTRUCTURE is equal to EXTERNAL, only the data received is put into the user s 
buffer; the actual length of the data placed into the user's buffer can be 
determined by interrogating the CURRENTRECORD attribute. 

The CENSUS attribute can be accessed but not assigned. If accessed as a file 

attribute, CENSUS returns the total number of messages queued for all subfiles. n 

accessed as a subfile attribute, CENSUS returns the number of messages queued for 
the specified subfile. 

CMANGEDSUBFILE .._,... .v. kfn . inH „ n r »„ 

CHANGEDSUBFILE is an access-only attribute that returns the subfile index ot an 



The subfile CHANGEEVENT is caused whenever the value of FILESTATE changes i t is 
reset as a side effect of interrogating the FILESTATE a tribute The CHANGEEVEOT 
for the file has the value "happened" as long as any of he subfile CHANGEEVENTs 
have the value "happened". The CHANGEEVENT for the file is reset by the system 
after all of the subfile CHANGEEVENTs have been reset. 



f IJRRHNTRECORD 

This attribute returns the length, in FRAMESIZE units, of the last record read or 

wr i t ten. 

FILESTATE . , ., • 

The FILESTATE attribute can assume the following values: 

CLOSED ( ) 

The initial state of a subfile is CLOSED. The subfile returns to this state 

when it is closed by the user. 

OFFERED ( 2 ) 

A subfile enters this state when an open has been done but no matching subfile 
has been found. I/O operations are not valid when the fnle is in this state. 

° FENE This state indicates that the subfile is open and may be used to send or 
receive data. 

CLOSEPENDING (6) ^ c , oscd , he subfile> but the other 

subfile has no? yet acknowledged the closure. When close acknowledgment is 
received, FILESTATE changes to CLOSED. 

DEACTIVATIONPENDING^T)^ ^ ^ ^^ ^.^ _ _ closed and ^ ,„,. 

subfile has data queued for input. 

DEACTIVATED (8) her subfMe has been closed and that this 

luofUe does notnave data queued for input. Close is the only valid operation 
for a subfile in this state. 

FRAMESIZE has tfce same semantics that it has for other types of f iles Data is 

always transmitted in 8-bit units, but the user program may deal with the data using 
other values for FRAMESIZE. 
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INPUTEVENT 

If accessed as a file attribute, INPUTEVENT returns "happened" if the CENSUS file 
attribute is greater than zero. If accessed as a subfile attribute, INPUTEVENT 
returns "happened" if the CENSUS subfile attribute is greater than zero for the 
spec i f i ed subf i 1 e . 

INTNAME 

This attribute has the same semantics that it has for other types of files. 

LASTSUBFILE 

This attribute contains the subfile index of the last subfile that was used for an 
I/O operation on the file. This value is updated only if the I/O operation was 
successful. LASTSUBFILE is the preferred synonym for LASTSTATION. 

MAXCENSUS 

MAXCENSUS specifies the number of input messages that can be queued for this subfile 
before the other subfile is given a "NO BUFFER AVAILABLE" indication. 

MAXRECSIZE 

The MAXRECSIZE attribute can be accessed or assigned as a file attribute and is 
access-only as a subfile attribute. As a file attribute, MAXRECSIZE is used to 

a c - " ■ ■ - - - . . 

as 
si 



access-only as a subfile attribute. As a file attribute, MAXRECSIZE is used to 
access or assign the maximum message text size for the port file. When interrogated 
as . * subff'e attribute, MAXRECSIZE returns the actual message text size for the 
subfile, which is negotiated when the subfile is being opened and may be different 
for each subf i le . 



MAXSUBFILES 

This attribute specifies the maximum number of subfiles that can be opened for the 
file. The subfiles are assigned indices from 1 to MAXSUBFILES, inclusive. 

MYNAME 

MYNAME is a string-valued attribute that is used during the subfile matching 

process; the value of MYNAME must match the value of YOURNAME for the complementary 

subf I le . ' 

OUTPUTEVENT 

OUTPUTEVENT is caused whenever output buffers become available and is reset by the 
system whenever no output buffers are available. 

SECURITYTYPE 

This attribute has the same semantics that it has for other types of files The only 
values allowed for SECURITYTYPE are PUBLIC and PRIVATE. 

STATE 

The STATE attribute returns result information about the last I/O that was done on 
the file. The following STATE bits apply to port files: 

STATE. [0:1] 

This bit indicates that an error has occurred and is set in conjunction with 
other STATE bits. 

STATE. [3:1] 

This bit indicates that an invalid subfile index was specified for an I/O 
operat ion . 

STATE. [8:1] 

This bit indicates that an I/O operation failed for one of the following 
reasons : 

a) A broadcast write failed for at least one subfile. 

b) A write with the DONTWAIT option was not done because no buffer was 
avai 1 abl e . 

c) A read with the DONTWAIT option was not done because no data was 
avai 1 abl e . 

STATE. [9:1] 

This bit indicates end-of-file. 

SUBFILEERROR 

The SUBFILEERROR attribute is set to one of the following values after each I/O 
OPEN, or CLOSE operation that affects the subfile: 

NOERROR(O) 

No error occurred during the subfile operation. 

NOBUFFER(3) 

An attempted write to this subfile failed because no buffer space was 
available. This error can occur only if DONTWAIT was specified on the write. 

NOFILEFOUND(4) 

An attempted open on this subfile resulted in a NOFILEFOUND result. 
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Tin p 

TITLE must be a simple name between 1 and 17 characters in length, inclusive. Its 
value must match the TITLE of the complementary subfile. 

YOURNAM string-valued attribute that is used during the subfile matching 

process; the value of YOURNAME must match the value of MYNAME for the complementary 
subf i 1 e . 

YOTTRTJSFROODE 

The YOURUSERCODE attribute specifies the usercode under which the process opening 
the other (complementary) subfile must be running in order to match this subtile it 
SECURITYTYPE isPRIVATE/ The default value for the YOURUSERCODE a 1 1 "bute •■ the 
usercode of the process opening this subfile. Setting the value of YOURUSERCODE to 
null sets the value back to the default. 

Open Operat ions 

A subfile provides a two-way, point-to-point, logical communication path between two 
programs. In order to establish this path, each program must describe the des red 
connection. The system compares connection descriptions, matches complementary 
descriptions, and marks the subfiles OPENED. This process i s cal 1 ed the mat chi ng 
algorithm. The following subfile attributes are used by the matching algorithm: 

"^^The MYNAME attribute is a string of up to 100 characters that i s used fo r 
matching complementary subfile descriptions. In order to match the value ot 
MYNAME must match the value of YOURNAME for the complementary subfile. A null 
value for MYNAME matches only a null value for YOURNAME. 

The YOURNAME attribute is a string of up to 100 characters that is used for 

matching complementary subfile descriptions. In order to match the value of 

YOURNAME must match the value of MYNAME for the complementary subfile. A null 
value of YOURNAME matches any value for MYNAME. 

TTTT P 

The TITLE attribute is in the form of a simple name (1-17 characters) and must 
not be null The TITLE must match the TITLE of the complementary file. The 
default TITLE is the value of the INTNAME attribute. 

Security checking is performed for each subfile as follows: If the value of its 
SECURITYTYPE attribute is PUBLIC, security checking is immediately successful. 
If the value is PRIVATE, the value of its YOURUSERCODE attribute must match the 
usercode of the process offering the complementary subfile. 




The 



,ne subfile to be opened is specified by a subfile index If the subf i 1 e index i s zero 
all subfiles with a FILESTATE of CLOSED are opened. When this open all facility is 
ued.ojen results can be obtained by interrogating the SUBFILEERROR a.tribut^ f he 
subfile* index is greater than zero but not greater «"»» MAXSUBF [LES only the specified 
subfile is opened. If no subfile index is specified and MAXSUBFILES * s greater than one 
an error of BADSUBFILEINDEX is returned (the open results are described below), it 
MAXSUBFILES is equal to one, the (only) subfile will be opened. 

The following three open options apply to port files: 

WAIT WAITis the default value. The subfile is offered for matching, and the 
program is suspended until a matching subfile is found. 

OFFER 

OFFER causes the subfile to be offered for matching, and the program is resumed 
without waiting for the subfile to be matched. 

AVAILABLE causes the subfile to be matched only to a complementary subfile that 
has been already offered. If a match is found, the subfile is ope^d- ' J 
match is found, a NOFILEFOUND result is returned (the subfile is NOl lett 
offered for subsequent matching). 

The OPEN function may return the following values as its result: 

° K(,) The open was successful. If the open type was OFFER, this result indicates 
that the open process was successfully started. 
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N0FILEF0UND(2) 

NOFILEFOUND is returned if AVAILABLE was specified for the open option and a 
matching subfile was not found. 

aLREADYOPEN(40) 

ALREADYOPEN is returned if the specified subfile does not have FILESTATE eaual 
to CLOSED. 4 

BADSUBF I LE I NDEX (42) 

BADSUBFILEINDEX is returned if the subfile index specified was less than zero 
or greater than MAXSUBFILES or if a subfile index of zero was specified with 
the AVAILABLE open type. 

As part of the open process, the value of the MAXRECSIZE attribute to be used in the 
conversation between the two subfiles is negotiated. The negotiated value is always the 
smaller of the two MAXRECSIZE values. 

For languages that allow implicit file open, port files may be implicitly opened by an 
I/O operation on the file. If a non-zero subfile index is specified, then only that 
subfile will be opened. If a subfile index of zero is specified, then no implicit open 
action will take place. If a subfile index is not specified and MAXSUBFILES is equal to 
one, then the subfile will be implicitly opened. 

I/O Operat ions 



Each subfile has a unique subfile index. A program can, by specifying a subfile index 
EavI,°,£Ett£c - ead °f write to a Particular subfile. If the subfile index is omitted and 
MAXSUBFILES is equal to one, the I/O is performed on the only subfile of the file. If a 
subfile index of zero is specified on a read, a non-selective read is performed. The 
non-selective read provides the ability to read the next message from any subfile If a 
subfile index of zero is specified for a write, the message is broadcast to all open 
subfiles. If in error occurs on any subfile during a broadcast write, the result from 
the write will indicate that an error has occurred. 

I/O statements may include a DONTWAIT specification, which allows the program to continue 
executing if the I/O operation cannot be completed immediately. If an I/O statement is 
prematurely terminated because of a DONTWAIT specification, a field in the STATE 
attribute is set to indicate this occurrence (see Use of Attributes). If a READ 
statement is executed and CENSUS is equal to zero, the program is suspended until data is 
available unless DONTWAIT is specified. If a WRITE statement is executed and no buffers 
are available, the program is suspended until the write can be completed unless DONTWAIT 
l s spec I f l ed. 

If a subfile index less than zero or greater than MAXSUBFILES is specified or if no 
subfile index is specified and MAXSUBFILES is greater than one, the program attempting 
i /« operation is terminated. Some languages have the ability to return a result from 
an I/O operation. These languages may return a "bad subfile index" indication instead of 
terminating the user program. 

When the value of the FILESTATE attribute becomes DEACTIVATIONPENDING, all subsequent 
write operations return an end-of-file indication. Read operat ions wi 1 1 continue to 
operate normally as long as there are messages queued for input; when there are no more 
messages queued for input, the FILESTATE changes from DEACTIVATIONPENDING to DEACTIVATED 
and all subsequent read operations return an end-of-file indication. If a program is 
?£t?!!!£a£i> waltln « '°1L»= * /0 operation to complete and the other subfile closes 
(FILESTATE goes to DEACTIVATED), the program is resumed and end-of-file is returned. 

I/O statement options, such as skip-to-channel, skip lines, and stacker selection, are 
ignored for port files. 

When the value of the FILESTATE attribute is OFFERED, all I/O operations will return an 
end-of-file condition. 

The length of data transfers through a port file is dependent on the following criteria: 

a) The length indicated in the I/O statement. 

b) The MAXRECSIZE of the subfile. 

c) For READ operations, the length of the data actually received (this is a factor 
only if BLOCKSTRUCTURE is equal to EXTERNAL). 

d) The size of the user's buffer. 

For WRITE operations, the amount of data sent is the minimum of the subfile MAXRECSIZE 
the length indicated in the WRITE statement, and the size of the user's buffer. If an 
£1toS£ci™ nlade t0 w ' ite data that is ,ar « er than MAXRECSIZE, the message is truncated to 
MAAKKC&i/;fc; no indication of this truncation is given to the user. If the length 
specified in the WRITE is smaller than MAXRECSIZE but larger than the user's buffer the 
message is truncated to the size of the user's buffer; no indication of this truncation 
is given to the user. The value of the BLOCKSTRUCTURE attribute has no effect on WRITE 
operat ions . 
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■ *\. mru-'ircTiiTTrTlTllF eaunl to FIXED, the length of data delivere 
For READ operations with BLOCKSTRUCTURE f^'th indicated in the READ statement, the 

CURRENTRECORD if always equal to MAXRECSIZE .n th.s case. 

-.v. mnr'irsTlllTrTITRE eaual to EXTERNAL, the length of the data 
For READ operations with BLOCKSTRUCTURE equa^ to . indica ted in the READ 

delivered to the ■•" » |$|{££ | Be size of the user's buffe?, and the size of the 
statement, the value of MAXRECSIZE the s ze 01 in e fc fc length indicated in 

actual message. If the size of t fc« «c t«» 1 me » • »«e i « i » ge buffer, truncation 

the READ statement, the value of MAXRECSIZE or t^me^oi ^ ^^ fm ^ ^^ f<jr 

SLOCKSTRUCTUR^equafto EXTERNAL* The CURRENTRECORD attribute may used to determine the 
length of actual message. 
Close Operations 

The execution of a CLOSE statement changes the FILESTATE of the ^cifjed subfile to 
CLOSEPENDING or CLOSED. Any messages that have been queued xor ret.., v 

Closing a port file may take a significant amount of .£. ^ecause .this^de.ay is 
unacceptable for 'If-f 1 if ' «"m b »s <l w the actual close takes 
DONTWAIT is -g»^«|"-*' ,".?',?.»"' li-lrSl mlidl.t.l, to the program and the 
place. If DONTWAU is spe c 111 c u , , ; narallel with the execution of the 
process of actually clos ing **■ *' *' ' a *£J l *" " Compete by monitoring state changes, 
program. The program ">»y de tectwh enth ec^os e The CLOSE funct ion may return 

All other close options (PURGE, LOCK, etc.ji are lguo 
the following values as its result: 

OK(l) . , 

The close was successful. 

FILENOTOPEN(30) 

The subfile was already closed. 

BADSUBFILEINDEX^^^ ^.^ ^ , ess tha „ zero or greater tha n MAXSUBFILES. 
I, the subfile index specified in a CLOSE statement is zero all open ..bf II es^are 
tt."-...!.^ ^ tne suofile index i s .great er than^ro ■ 

n 



but 
If no subfile index 

s 



interrogating the SUBE1 LfcbKKUK aitriouie. * "- "" I s closed If no subfile inde 
„ ot greater t^n MAXSUBFILES , ..1, ,.h. spec, led ^f.le i—lose^ I FJLEINDEX , 

retu^df'.f MAXSU^FILEs'ifequ:. !."«. the (only) subfile will be closed. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 



GENERAL 



P3273 GENERAL - COPYRIGHT, VERSION LEVELS UPDATED 
The copyright notices have been updated for 1980. 
Version levels for all software products have been set to the current level 
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DOCUMENT CHANGES NOTES (D NOTES) 
ALGOL 

D2837 ALGOL - COMPILE TIME EXTENSION TO " <DEFINE DECL> " 
The following changes should be made to the ALGOL Language Reference Manual (Form No. 5001639): 
On Page H-l, change the third line from "and (4)" to "(4) an extension to the <define 
declarations and (5)". 

On Page H-4 , before heading "Compiler Options", add the following: 
"EXTENSION TO <define declaration> 

The following extension to <define declaration is available when using the compile-time 
faci 1 i ty : 
definitions :=<defined ident i fi er>< formal symbol part>=< te*t>#| 

Si?! S 

i nvocat ion . 

D3000 ALGOL - "SBEGINSEGMENT" NOT FOR USE AROUND BLOCKS 

to use this option around blocks; e.g., 

SBEGINSEGMENT 
BEGIN 

REAL X; 

END; 
SENDSEGMENT 

2^.ir'-is:i,^nt;:! , ji.a:.S , irtt.W-:^-SJ^"-^-'^»^- !: 

fol lows :., 

;Tj:.sr -S5S.ts.fR5S •tii-was&js'u.-aaauj .kks* ;:. $%*$$. 

user segment. External procedures cannot be declared in a user segment. 
The sixth paragaraph on Page D-7 under "BEGINSEGMENT (RESET)" should read as follows: 

"A procedure cannot be split across user segments." 
The last paragraph on Page D-7 under "BEGINSEGMENT (RESET)" should read as follows: 

called procedures into one segment to reduce "presence bit overhead. 

D3001 ALGOL - GLOBAL "WFL" FILES IN "$ INCLUDE" OPTION 

Global WFL files cannot be used in conjunction with the SINCLUDE option. 

Add the following to the ALGOL Language Reference Manual (Form No. 500*639), as the third 
sentence on Page D-15, under "INCLUDE (cannot be SET or RESET) : 

"Files declared globally in WFL jobs do not work in conjunction with the INCLUDE option and 

should not be used as INCLUDE files." 
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D3009 ALGOL - "STRING" EXPRESSIONS IN "WRITE" AND "REPLACE" 

T h n I?AA? Wi "? °Jl?;fS S have been lnade to the ALG0L STRIN G implementation, which was described in 
3.U ALUOL, note D2427 : 

THE REPLACE STATEMENT 



The REPLACE statement has been expanded to allow <string expressions in the <source part> 

?l„tL »«• <str,n g ex ? r " s,on > and <? ource P af t>. the metavariables are defined in the ALGOL 
Language Reference Manual (Form No. 5001639), Page 5-78. «—*«/*. 

New Syntax: 

<replace statement> 



REPLACE — <dest inat ion> — BY <source part> | 



<source part> 

-<source> — <t ransfer part> 

-<ar i thmet ic express ion> 

|-<unit count>- 

-<digit convert part> 

-<numeric convert part> 

-<t ran slate par t> 

-< pointer-valued attr ibute> 

-<string express ion> 



Ex amp 1 e s : 

REPLACE P BY SI II S2; 

REPLACE P BY PTR:PTR FOR 10, 

TAKE(S,2) | | SA[4], 
PTR FOR N, 
HEAD (S, ALPHA); 

INPUT/OUTPUT 



A <string expression) is now allowed as a <list element> for formatted and unformatted output. 
Examples : 

WRITE(OUT, 10, SI | | S2); 

WRITE(OUT, <2A10>, TAKE(S1,2), SI || "ABC"); 

D3062 ALGOL - LONGER STRINGS WITH IMPLICIT CONCATENATION 

The maximum length of string I i terals formed by implicit concatenation has been increased from 
256 characters to 4095 characters. The maximum number of characters which may be placed within 
a single set of quotes is still 256, however. P 

The following example is now legal: 

ARRAY A[0:683] ; 

REPLACE POINTER (A[0]) BY "<256 chars>" "<256 chars>". . . 

. . . <up to a total of 4095 characters) ; 

The new length limit is valid for assignment to STRING variables, for use within REPLACE 

vl? r^t^/So™!! h ? tatements ' an ° f °r declaration of VALUE arrays. The new limit is NOT 
valid within rORMAT declarations. 

D3063 ALGOL - EVENTS, EVENT ARRAYS AS LIBRARY PARAMETERS 

Events and event arrays are now allowed as parameters to library procedures. 
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D3211 ALGOL - GIVE WARNING FOR " INTMODE=BCL" 
The warning "BCL PROGRAMS ARE NOT PORTABLE TO EBCDIC MACHINES" is now given for any of the 

following constructs: 

F I LE F ( I NTMODE=BCL ) ; 

F(INTMODE=BCL); 

F . INTMODE : =VALUE(BCL) ; 

D3266 ALGOL - ALLOW "LONG" AS KEY WORD 
D r tn the Mark 32 system release, all VALUE ARRAYs have been treated as LONG. 
tegmenHng of VALUE ARRAY^win be accomplished by the following process: 

1 . Release 31 PR1 

LONG will be allowed as a key word in VALUE ARRAY declarations. All VALUE ARRAYs will still 
be long. 

2. Release 32 

VALUE ARRAYs without requesting them. 

parameters and result are identical to MASKSEARCH. 

3. Release 33 

have no effect . 
D3269 ALGOL - BINARY "I/O" FOR STRINGS 
Binary I/O for Strings in ALGOL 

Binary I/O for strings in ALGOL previous ly did not work because the length j' ^^^j?*,^ 

neither read or written A binary write »' J ' ,^ „ ''"li ,/o for strings in ALGOL 

no^workV'slmfllr.y^ o^ry i^f Mother da^fy es^enever /string is written using a 
binary write, it can later be read using a binary read. 

Example: 

WRITE(F,», STR, STRARRAY[5], STR || "ABC"); 

Can later be read by: 

READ(F,*, STR1, STR2 , STRARRAY[0] ) ; 
When a string is written using a binary write, the length of the string is written as the next 
word in the file, followed by the string text. 

When a string is read using a binary read, the next word in the file is read as the length of 
The string! fhen that nany characters are read into the string variable. 
Strings are stored in the same manner as LEN, PTR FOR LEN, where LEN is an integer and PTR i s a 

Free-field Output for Strings 

r::i:i::; ::ru. f ^/r,':s,ni:r«P™»io:^."o"rv^^ ; ''' o: '° ; " ,; "'" 3 '' Jt 

string faction names would be output as an unknown construct ( <UNK> ). 

Ex amp 1 e : 

WRITE(F,V,TAKE("ABC",2) || DROP( " ABC" , 2) ) ; 

Would output : 

<UNK> ( " ABC " , 2 ) <UNK> <UNK> ( " ABC " , 2 ) =ABC , 
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The concatenation operator and the string function names will now be written correctly. 
The above example will now write: 

TAKE( "ABC" ,2)| |DROP( "ABC" , 2) )=ABC, 
D3 349 ALGOL - SET " SNOBINDINFO" 

The BINDER cannot properly bind codefiles which contain the timing code nece^arv f„, 
statistics; thus, NOBINDINFO is set automatically if STATISTICS s^set If NOBINDINFO?, 
subsequently reset, an error is given and the following message is emitted: * ' NOBINDINFO ,s 

"SETTING STATISTICS PREVENTS PROGRAM FROM BEING BOUND". 

D3350 ALGOL - FLAG "SNOBINDINFO" 
The information saved for the BINDER when NOBINDINFO is reset is also necessarv to make th- 
NObIndTnFO and° S MA K EH^ C ^rb P otr:er mPilati0nS <*" "* ^^ * "" « "" ' * • ^ ^en *?? 

D3360 ALGOL - MODIFICATIONS TO SUPPORT PORTFILES 

GK A I SU ^?rAJU eS "? f KIND=POR T ^/i 1 °f the applicable file attributes. (See Mark 32 
GENERAL note D3650, Implementation of Port Files", for a description of port files ) 

ALGOL provides access to port subfiles through the new SUBFILE syntax of the READ and WRTTF 
statements The following diagram describes the <subfile specif cat°on> which annears a^ ™ 
option in the syntax for <record number or carriage control): ' appears as an 

<subfile spec i fi cat ion> 

DONTWAIT i 

I- SUBFILE -- <subfile index> 

I- <result> : -| |_ f DONTWAIT 

<resu 1 1 > 

— <arithmetic variable> — | 

<subf i I e index> 

— <arithmetic expression) — | 

For READ statements if the <subfile index> is zero, a non-selective read is performed- if it 

::. rrs:T^.: a-tt's^r.-jxi'jjf.rtii'i.!: >.v,'°,i?a^.* •'«- ••■" & <-»"> i: 

Exampl e : 

READ(INFILE[ SUBFILE J.I, DONTWAIT] , 14 ,A[ *]) ; 



l s 
is set to 



For WRITE statements, if the <subfile index> is zero, a broadcast write is oerformed- if it 
non-zero, a write to the specified subfile is performed. In M c e ! ; f A 
zero; in the second case, it is set to the value of the <subfile index> < resu "> «• » 

Exampl e : 

WRITE(OUTFILE, [SUBFILE I],14,A[*]; 

If DONTWAIT is specified for a READ statement and no message is available, no data is returned 
(i.e. no variables in the list are altered) and the task is not suspended! returned 

If DONTWAIT is specified for a WRITE statement and no buffer is available the task i « not 

n° o 'I/O Ih/'I m specification) may be used only on READ anS WRITE sta^ment using 

array-row I/O, the <subfile spec i f . cat . on> may not be used with formatted, free field or b"na?y 

ALGOL der if° OPEN id f/ C n^H t0 thC P ° r Tt ° pen °P tions > the OPEN statement has been added to 
ARABLE a.?H but e ^ " " funct,on ' " ret » r °* *- integer value corresponding to the 

op'ene'd o^f re^i n g * f roT or°wr ? t 'ng * t o ' l^L* «'"'" * h " °' th " ^^^ «' * >« "Plioi.l, 
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<open statement) 

OPEN — ( — <file designatoo- 



-<:open type>- 



[ SUBFILE <subfile index> ] 



<open typo 

WAIT 

OFFER 

AVAILABLE 



If no <open typo is specified, WAIT is assumed. 

Ex amp 1 e : 

OPEN ( I NF I LE[ SUBFILE I] .WAIT) ; 



CLOSE. 

<close statement) 

— CLOSE — ( — <file designator>- 



[SUBFILE <subfile index>] 



<close option> -| 



<close option> 

* 

CRUNCH — 

LOCK 

PURGE 

REEL 

REWIND — 
DONTWAIT - 




be c losed . 

The only meaningful close option for port files is DONTWAIT. 

Ex amp 1 e : 

CLOSE(INFILE[ SUBFILE I]); 
D3363 ALGOL - REMOVE "SIGNAL" AND "RESPONSE" 
The SIGNAL and RESPONSE clauses for <record number or carriage control) for the READ and 
statements are no longer recognized. 



WRITE 



B6000 SERIES MARK 3 2 RELEASE 05 NOVEMBER 19 80 ALGOL 



PAfiF 7 

B6000 SERIES MARK 32 
D3433 ALGOL - ARRAY ROW EQUIVALENCE TO OWN ARRAYS 
The syntax for array declarations does not prohibit an array declaration of the form 
OWN ARRAY A[0] = B 

equivalence 6 f^OWN*"? f ' "*«* ' 'In? ' *?"?£ thU de ? ,aration ; became an array row declared by 
equ valence is OWN if and only if the row it is declared equivalent to is OWN In the 
following example, therefore, the array A is OWN, and the array Al is not OWN 

OWN ARRAY B[0: 10] ; 
ARRAY B1[0: 10] ; 
EBCDIC ARRAY A[01=B- 
HEX ARRAY Al [0]=B1 ; 

D3434 ALGOL - "SDIGITS" IN "REPLACE" STATEMENT 

The class 2 reserved word "SDIGITS" (read " s ien-d i ai t s " 1 mav hf ....h in » gppi in „..♦ 
the^same way as "DIGITS" is used, except that thf's.gn Vt' tit <a? ?,J2. . if 5JS. l^i . * a 1 so 

hft« he „f de »n Ua f i0 ? > i? •? 8 ~ b i t „??'?! er> the si « n is recorded by changing the four high-order 
No.e ,h . lu i f^ d ' 8,t - ? ' ,101 0f 1 ,10 °" for negative or positive sign, respectively 
thraritLe.tc'functi^n 1 "' ' ' ■ PP "' l ° "" " ch »" c <" <•■•■ -« => P 48°F5D5" = 8 "5N" ) , P ^ J tho^h 

INTEGER( <pointer expression), <ar i thme t i c expression) ) 
will distinguish it as a sign and will thus make the correct reverse mapping. 

or ^ f^r S ni!! a J! 0n> iS " -T-* 1 P° in ter, then ^e sign is encoded by prefixing the hex digit D 
or C for negative or positive, respectively. INTEGER wi 1 1 not count the sign in its cofint nf 
digits converted from the pointer, however; e.g., the following program fragment 

HEX ARRAY AFO: 10] • 

INTEGER I; 

REPLACE A BY -12345 FOR *SDIGITS- 

I:= INTEGER(A,5); 

WRITE (FILEID, */, I); 

will wr i t e 

l=-12345, 

D3435 ALGOL - REPLACE POINTER VALUED FILE ATTRIBUTE 

Th £ T" 1 ? f £ rm ?£ <5 e P ,ace Pointer-valued attribute statement) which is accepted by the ALGOL 
compter when the destination is a <point er-valued file attribute) is: " cpteo Dy tne AL <^ 

REPLACE <pointer-valued file attribute) BY <simple source) 

D3436 ALGOL - "< FORMAL PARAMETER SPECIFIER)" 

Reference en Manua? ^0™°^' ?Sri?«i? r ■ ' P - Cl f '"> ?" Page 4 - 55 ° f the B7000/B6000 Algol 
liltl for ,h l, ( ! !if!H 5001639) is incorrect because it leaves out the <formal parameter 
list) for the fully-specified form of specification. The correct documentation is: 

<formal parameter spec i f i er> : : =<emp t y> | 

( ); FORMAL I 

<formal parameter part>;FORMAL 

D3437 ALGOL - MESSAGE IN "<DISPLAY STATEMENT)" 

The B7000/B6000 Algol Reference Manual (Form No. 5001639) page 5-34 under DISPLAY STATFMFNT 
S f lV, In* \ meSSage ° f less w than 25 characters must be'term.na.ed by the character 4 ? Jo T ^ll 
mu:;'b: , !er:i„aT e rbri»oS" , ' be term *" ated b * 4 " 00 "- ™is sentence snould thus rlad Vmessage 

D343 8 ALGOL - "[NO]" HAS NO EFFECT ON REMOTE FILES 
?hat 3ge 5 " 69 ° f the B7000/B600 ° A '8°» Reference Manual (Form No. 5001639) statement is made 

"'! 'J' <record number or carriage control) is [NO], the buffer is not released after it has 

a REMOTE f?[ P Wr fvm"„ '■ e " ^ re cord can be read again..." This is not true if „e f e is 
a REMOTE file. [NO] has no effect if the file is KIND=REMOTE. 
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D3439 ALGOL - R IS A "<SINGLE PICTURE CHARACTERS 

The section on PICTURE DECLARATIONS in the B7000/B6000 ALGOL Reference Manual (Form No. 
5001639) (pages 4-51 to 4-53) show the edit character "R" as a < pl cture character> and 
describes its action incorrectly. 
"R" is a <s;ingle picture character;.. Its action is as follows: 

■I, an E or F No,, h, no, ended ( the P""'^^.^'^:; Landing 1 on°wne ther* ,h! 
?"M?V r sign S fllp-fIo;- 'twes^or'se?! respectively, and the float Vs ended. Otherwise, 
no action. 

WARNING: 

■ti.. cit,- „f the external sian flip-flop is independent of the REPLACE statement that is 
™ t l, liltnrt The external sign flip-flop is in the state in which it was left after 
?he g la t C oEerat on wS.cn co^d Effect P it. If the last such .operation was 
REPLACE destination> BY arithmetic expressiion> FOR <ar . thmet i c express ion> DIGITS, for 
SJle the external sign flip-flop will reflect the sign of the <anthmet.c express. on> 
which was the source." 
D3455 ALGOL - CLARIFICATION OF " DSCALELEFT " FUNCTION 

The arithmetic function DSCALELEFT is intended for use only with a second- parameter greater 
Than or eq t and less than or equal to 12. DSCALELEFT wi 1 1 produce unpredic able resul s 
.f Us second Parameter (the power of ten by which the first parameter ,s to be mult. pi. ed) .s 
outside this range. 
D3471 ALGOL - ALLOW LONGER VALUE ARRAYS 

Th „ „,,,;„,,„,, eiy* of a value arrav has been 4095 words. With the implementation of segmented 
Ta. u r arrays (see Mark 3rALGOL y note D3266), it is now advantageous to allow value arrays that 
are much longer. 

Value arrays which are "segmented" may now be up to 32767 words in length. Value arrays which 
are not "segmented" will remain limited to 4095 words. 

D3490 ALGOL - CLARIFICATION OF "$MERGE" 

The description of MERGE on Page D-23 of the ALGOL Manual (Form No. 5001639) is correct except 
for cases where CHECK, SEQERR or NEWSEQERR are reset (these options are reset by default). The 
following descripTTon 'of the effect of the MERGE option is correct, whether or not sequence 
errors are being flagged: 

"When SET, the MERGE compiler option causes the primary input (the CARD file) to be merged 

with the secondary input (the TAPE file). 

If the MERGE option is not SET, only primary input is used, and the secondary input is 

totally ignored. 

If MERGE is SET, the process of determining the input to the compiler is as f °l 1 °, w |. 
starting with the first card image in the TAPE file and the first card ,mage in the CARD 
file following the image upon which MERGE was set: 

If the next card image in the CARD files does not have the same sequence number as the 
next card image in the TAPE file, the image with the smaller sequence number is taken as 
input . 

If the next card image in the CARD file has the same sequence number as the next card 
image in the TAPE file, the image from the CARD file is taken as input, and the image .n 
the TAPE file is discarded. 

The sequence number of card images from files being INCLUDEd are not considered by the MERGE 
process; merging is suspended until the INCLUDE has been completed. 

D3 5 22 ALGOL - REPLACE INTO DOUBLE PRECISION ARRAY 

If the <dest inat ion> pointer in the construct 

REPLACE <dest inat ion> BY <real value> FOR 
<ari thmet ic expression) WORDS 

points to a DOUBLE array, this does not have any effect on the REPLACE; i e., <ari thme tic 
exnress o.n> words will be replaced, not 2«<ar i thme t i c expression) words. Also if the <real 
value* is single-precision, then the tags of the words which had the.r values replaced w.ll be 
zero (tag indicating single-precision operand). 

The statement 

REPLACE <destinat ion> BY DOUBLE(<real value>) FOR 
2*<ar i thme t i c expression) WORDS 

B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 ALGOL 



PAGE 94 
B6000 SERIES MARK 32 

will replace arithmetic expressioro double values, retaining the correct tag for 
double-precision values. 

D3526 ALGOL - "<PICTURE DECLARATION) " 

The second alternate for the production of the <picture symbol> < int roduc t ion> should be 
changed to show two <hexadec ima 1 characters are required. The correct production is as 
fol lows : 

< int roduct ion ::= < i nt roduc t ion codexnew character> I 

<*<int roduct ion codexhexadec ima 1 charact er><hexadecimal character> 

D3530 ALGOL - "FUNCTIONNAME, " "LIBACCESS" ATTRIBUTES 

Library declarations may now specify the FUNCTIONNAME and LIBACCESS attributes. FUNCTIONNAME 
is a string-valued attribute used to specify the system function name that will be used to find 
»"£ *?'8 e ! < :? de flle , for the library. LIBACCESS is a mnemonic-valued attribute: the value 
BYTITLE indicates that the TITLE attribute of the library is to be used to find the librarv's 

MCP 
id 



Diiiiui inaicates tnat tne iule attribute of the library is to be used to find the library's 

code file. The value BYFUNCTION indicates that the FUNCTIONNAME is to be looked up in the MCI 

library function table which is maintained by the ODT message SL (see GENERAL note D3356) anc 
the associated code file name will be used. 



D3537 ALGOL - MAXIMUM SIZE OF SWITCH FORMAT 

The upper bound on the size of a switch format is determined by how large one of the ALGOL 
compiler's internal arrays may be made by RESIZING. This in turn is determined by the size of 
At 1 !™^!?™ cont, g uous P>ece of memory which may be allocated on a system; i.e., OLAYROWSIZE 
OLAYROWSIZE is set at cold-start time. (There is no uniform limit to the size of a switch 
format; the limit on any system is usually large, however.) 

D3563 ALGOL - NO RESIZE/DEALLOCATE OF SEGMENTED ARRAY 

RESIZE and DEALLOCATE of segmented arrays have never been implemented. 

The ALGOL Reference Manual (Form No. 5001639) should be revised as follows: 

Page 5-91, after the last paragraph, add the following: 

"RESTRICTIONS 

£££?!:£ fS?™ a " ays may not be resized. See discussion of LONG ARRAYS under ARRAY 
Ul^CLAKA 1 1 ON . 

Page 5-31, after the last paragraph, add the following: 

"RESTRICTIONS 

A ™?« ££™*»?£. m ™, t ^ d arrav ma y not be deallocated. See discussion of LONG ARRAYS under 
AKKAY DECLARATION. 

D357 8 ALGOL - LEGAL INPUT TO FORMAT 

Data .?Li he f 2 rm 1 P +4 . is ,e « al in P ut t0 the D > E and F formats. For E and F, it is equivalent 
to 123E4 For D, it is equivalent to 123D4. There is an example of this in the ALGOL 
Reference Manual (Form No. 5001639) under output examples for D, E formats. 

The following manuals should be revised to include examples of this type of input: 

ALGOL Reference Manual, Pages 4-28 to 4-30. 
FORTRAN Reference Manual, Page 13-4 to 13-7. 

D3610 ALGOL - PASSING FILES BY REFERENCE TO LIBRARIES 

The template and directory entries for files will now indicate that the file is beine passed bv 
reference instead of by name. 6 v * 

D3623 ALGOL - "OFFSET" AND "DELTA" 

The OFFSET intrinsic has been rewritten to run much faster. It has also been changed to be 
consistent with DELTA and other pointer operations, by reporting single- and double-word 
pointers in units of eight-bit characters, instead of in 48-bit words. 

The DELTA intrinsic is now much faster for the non-optimal cases. Its values remain unchanaed 
for all proper uses. 

For details, see Mark 32 MCP note D3606. 
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D3626 ALGOL - RESIZING "EVENT ARRAYS" 

EVENT ARRAYS are now allowed to be resized. The syntax is analogous to that for an array row. 
The following are the changes to the syntax of the RESIZE statement on Page 5-91 of the ALGOL 
Reference Manual (Form No. 5001639): 

<resize s tatement> : :=RESIZE(<res i ze array identifiers 

<ar i thmet ic express ionxretain old>) 
<resize array ident i f i er> : :=<array row>|<event array row> 
<event array row> : :=<event array identifier>| 

<event array ident i fier> [<irow des ignator>] 

RETAIN must be specified for EVENT ARRAY s . Also, if the new size is not greater than or equal 
to the old size, a run-time error will occur. 

D3633 ALGOL - "REAL (<POINTER EXPRESSION^ " 

The function REAL(<pointer expres s i on>) has been de irnpl ement ed. 
D3654 ALGOL - "REAL (<POINTER EXP> , <ARITHMETIC EXP>)" 

The following line on Page 6-26 of the ALGOL Reference Manual (Form No. 5001639) should be 

deleted : 

"All bits of each character are used." 

D365 7 ALGOL - "NOBCL" COMPILER OPTION 

The compiler control option NOBCL has been implemented. When set, this option generates an 
error for every attempt to use BCL pointers. This will facilitate the user in elim.nat.ng BCL 
constructs, so that programs will run on future non-BCL systems. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
ALGOL 



P2724 ALGOL - STRINGS AS ATTRIBUTES, "TR" ITEMS 

DISPLAY of a string expression did not work for string expressions which began with a SIGNAL or 
LIBRARY attribute of type string or a transaction record item of type alpha. This problem has 
been corrected. [Note that SIGNALS have been de-implemented.] 

A boolean primary did not allow comparison of string expressions which began with a LIBRARY 
attribute of type string or a transaction record item of type alpha. This problem has been 
corrected. 

For a transaction record assignment, if the length of the string expression and the length of 
the transaction record item are not the same, the lengths will be matched as follows. If the 
length of the string expression to the right of the assignment operator is less than the length 
of the transaction record item to which it is being assigned, the string expression will be 
padded with blanks. If the length of the string expression is longer than the transaction 
record item, the string expression will be truncated. Previously, this matching of lengths was 
not done. 

The allocation of string temporaries was redone to use a stack of temporaries for each lex 
level. This will allow string temporaries to be reused more efficiently. 

P2903 ALGOL - INTERNAL ARRAYS EXPANDED 

The dimensions of some internal arrays have been expanded to avoid getting an INVALID INDEX 
while creating the stack image for the BINDER. This problem, which only occurred for very 
large programs, has been corrected. 

P2916 ALGOL - CODE OPTIMIZATION CORRECTED 

If the first instance of a Boolean expression optimization in a code segment occurred in the 
same syllable as the last Boolean expression optimization in the previous code segment, the 
compiler would generate bad code. 

This problem has been corrected. 
P3037 ALGOL - INCORRECT SIGN FOR COMPLEX EXPRESSION 

In a complex expression of the following form, the sign of the imaginary part was not changed: 
<real> - <complex> 

This problem has been corrected. 

P3038 ALGOL - INVALID ASSIGNMENTS NOT FLAGGED 

After a relation of the following form occurred, assignments of complex expressions to 
arithmetic variables were not flagged as syntax errors: 

<exp> = <exp> 

This problem has been corrected. 

P3039 ALGOL - COMPLEX EXPRESSIONS 

Incorrect code was being generated for complex expressions with constant arithmetic 
subexpressions. This problem has been corrected. 

P3040 ALGOL - ERRONEOUS SYNTAX ERROR WITH COMPLEX 

It was possible to get an erroneous syntax error on complex expressions. The following example 
would give a syntax error: 

Ex amp 1 e : 

BEGIN 

REAL A,B; 

COMPLEX C; 

C:=l + A DIV B + C; 
END. 

This problem has been corrected. 
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P3041 ALGOL - INCORRECT SOFTWARE CONTROL WORD 

Under certain conditions, involving strings or complex in an I/O list, an incorrect software 
control word was being bui 1 t Incase of an error, a Halt/Load could occur. This problem has 
been corrected. 
P3091 ALGOL - "INVALID OP" WITH LONG EXPORT LIST 

An INVALID OP was occurring in the ALGOL compiler if an export list being compiled was 
exceptionally long (more than 60 entry points). This problem has been corrected. 

P3092 ALGOL - "INVALID INDEX" WITH LEX LEVELS > "15" 

An INVALID INDEX was occurring in the ALGOL compiler when compiling procedures with lex level 
greater than 15. This problem has been corrected. 

P3139 ALGOL - CORRECT "XREF" OUTPUT FOR LIBRARY PROCEDURES 
Incorrect environment information was being given to XREFANALYZER by ALGOL for procedures which 
were imported from libraries. 

Example : 

BEGIN 

$SET XREF XREFFILES 

LIBRARY L; 

PROCEDURE PI; LIBRARY L; 

PROCEDURE P2; LIBRARY L; 
END. 

In the above example. PI and P2 are imported from L. A subsequent g 1 ^^*, t ° DE i L ^ C I| VEXR ? F 
for DEC P2 would indicate that P2 was nested within PI: PROCEDURE P2 OJ< PI. DbtXAKliU ai ... , 
although this is not the case. This problem has been corrected. 

P3154 ALGOL - "INVALID OP," INDEXED STRING ARRAY 

When an element of a string array was passed as a value parameter and the string passed was 
long enough to be segmented, an INVALID OP would occur. This problem no longer occurs. 

P3155 ALGOL - "INVALID OP" FOR STRING EXPRESSIONS 

It was possible for code to be generated to access 'inval id or incorrect address couples when 
slrTng expressions were used in WRITE statements, thus causing an INVALID OP or sequence error. 
This problem no longer occurs. 

P3324 ALGOL - MULTIPLE "ELSE" CLAUSES IN "CASE" STATEMENT 

Formerly a case statement of the form 

CASE <ari thmet ic expression> OF 

BEGIN 

0: <statement>; 

1: <statement>; 

ELSE: <statement>; 

3: < statement:*; 

ELSE: <statement>; 

END CASE; 

would not receive a syntax error (only the last ELSE was effective). Multiple ELSE clauses 
will now cause a syntax error. 

P3406 ALGOL - PREVENT "INVALID INDEX" 

The ALGOL compiler no longer DSes with an INVALID INDEX compiling a TAKE function with an 

invalid parameter list. 

P3407 ALGOL - CALL "BLOCKEXIT" TO DEALLOCATE BOUND GLOBALS 

An ALGOL program which had no global declarations of the type requiring a call on the MCP 

procedure BLOCKEXIT could have such global s added by binding. Since no call on BLOCKEXIT was 

maSe? Eoweve^ these aSded global* would cause dumps by FORGETCHECK, etc. Th.s problem has 
been corrected. 

P3408 ALGOL - "INVALID INDEX" 

An INVALID INDEX no longer occurs when a certain type of syntax error (using a string literal 
as the actual parameters a procedure expecting a character typo array) is encountered. 
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P3409 ALGOL - ACCEPT n (<STRING VARIABLE>)" 

The ALGOL compiler no longer neglects to emit a conditional branch when ACCEPT (<string 
variablo) is used as the Boolean condition in an IF statement. 

Exampl e : 

IF ACCEPT (STR I NG1) THEN . . . 

Previously, the THEN part of the statement would never execute; occasionally, a stack overflow 
would occur. 

P3410 ALGOL - MAKING USE OF AVAILABLE SPACE 

The code in the ALGOL compiler that makes use of UNUSED space at the end of a code file now 
will correctly achieve its purpose. 

P3411 ALGOL - INTRINSIC AS A NAME PARAMETER 

The ALGOL compiler failed to test for intrinsics and inline intrinsics when they were passed as 
name parameters and was emitting a NAMC (0,0) instead of generating the correct code. The 
problem arose only when the intrinsic being passed had no parameters; e.g., LINENUMBER. This 
problem has been corrected. 

P3412 ALGOL - PICTURE AS A FORMAL PARAMETER 

When calling a procedure which had a picture as a formal parameter, no check was made to ensure 
that the actual parameter had been declared. This problem has been corrected. 

P3413 ALGOL - "CTPROC, CTDEFINE" VS. PARAMETER LIST 

An erroneous syntax error is no longer emitted when using a compile-time define to generate a 
parameter list. 

P3414 ALGOL - COMPLEX TIMES REAL MULTIPLICATION 

Incorrect code was being generated in some cases for multiplication of a complex operand and a 
real operand. This problem has been corrected. 

P3415 ALGOL - CLEAR "SCW" INFORMATION 

The Software Control Word information is now cleared before it is used instead of after it is 
used, thus correcting a problem involving binding. 

P3416 ALGOL - STRING POOL EXCEEDED WITH "SINTRINSICS* 

Strings were not being returned to the string pool after they were used in the outer block of a 
program which had the dollar option INTRINSICS set, thus causing the run-time error STRING POOL 
EXCEEDED to occur. This problem has been corrected. 

P3417 ALGOL - FLAG "BCL" POINTERS WITH OFFSET 

The option SNOBCL would not flag a pointer expression with an offset. An error is now 
generated. 

P3418 ALGOL - LONG CHARACTER ARRAYS 

Previously, the ALGOL compiler would flag as an error a long character array declared globally 
to an externally-compiled procedure. Such global declarations are now allowed. 

Ex amp 1 e : 

[ 

LONG EBCDICARRAY A[0] : 
] 

PROCEDURE X; BEGIN END. 

P3463 ALGOL - CALLING USERIOERROR FOR "MYSELF. TASKFILE" 

An I/O error when writing to MYSELF. TASKFILE no longer results in a memory dump. 

P349 8 ALGOL - "INVALID INDEX" AFTER PARAMETER MISMATCH 

When a string literal is passed to a procedure expecting an EBCDIC array, an INVALID INDEX no 
longer occurs. 

P3526 ALGOL - PREVENT POSSIBLE STACK OVERFLOW 

If a stack overflow condition arose when a program attempted to compare two pointers (not the 
string pointed at by the pointers), the stack would not be "stretched" and the program would be 
DSed for "STACK OVERFLOW". ° 
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Ex amp I e : 

POINTER P1.P2; 

IF P1=P2 THEN . . . 

The stack will now properly get stretched in the above example. 

P35 32 ALGOL - CALL RESETPOOLSTRINGSIZE 

A typed procedure which had only a single statement (no BEGIN-END) and used string temporaries 
no longer fails to deallocate them. The following example now works correctly: 

INTEGER PROCEDURE P; 

P : =DECIMAL( STRING( " 1 2 3 " , 3 ) ) ; 

P3533 ALGOL - CORRUPTION OF VALUE ARRAYS 

If Dart of a value array declaration comes from an INCLUDE file, the contents of the value 
array are no longer corrupted; previously, the 1NTNAME of the INCLUDEd file would become part 
of the value array. 

P3 560 ALGOL - "BCL" CONSTRUCTS REMOVED 

BCL constructs within the compiler symbolic have been removed. Aj I references have been 
replaced with equivalent constructs not using BCL. The compiler will generate BCL code when 
the program being compiled so specifies. 

P3611 ALGOL - GLOBAL "STRING PROCEDURE" AND BINDING 

Previously, the use of a global STRING PROCEDURE having a forward which was to be bound would 
resulT in the erroneous lyntax message "SPECIFICATION DIFFERS FROM FORWARD DECLARATION". Th.s 
problem has been corrected. 

P3625 ALGOL - INVALID "I/O" LIST ELEMENTS 

Previously, the compiler would get an INVALID INDEX when a WRITE statement using an invalid 
LIST statement occurred. Now, the compiler generates a syntax error for the invalid LIS! 
statement and does not get an INVALID INDEX. 

P3661 ALGOL - GIVE ERROR FOR SPACES WITHIN NUMBERS 

According to the ALGOL Reference Manual (Form No. 5001639), spaces are not allowed within 
numbers. Unfortunately, some instances of spaces within numbers were not being detected by the 
ALGOL compiler. Moreover, the code generated for these instances was incorrect; i.e., it was 
not the same as for the number formed by removing the spaces. 

Ex amp 1 es : 



= 1. 2; 
= 1 .2; 
=1.2 3; 
= 1 • 2; 



This problem has been corrected; spaces within numbers are now treated as errors. 
P3774 ALGOL - MISSING "BLOCKEXIT" 

If the option NOBINDINFO were SET, no BLOCKEXIT call or TAG SIX word was emitted for the main 
block (level 2) of a program. When executed, a FORGETCHECK dump occurred if there were level 2 
items to be deallocated. This problem has been corrected; now, a BLOCKEXIT call and a TAG SIX 
are emitted if necessary. 

P3798 ALGOL - LOCKING CODE FILE 

When compiling two or more procedures with SLIBRARY set, the code file would be locked if only 
the last procedure had no syntax errors. The codefile should be locked only if all procedures 
are compiled without errors. This problem has now been corrected. 
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P2940 ALOOLINTRN - BACKUP FILE SEARCHING 

Backup file searching by the BATCHMONITOR intrinsic has been improved. 

P3298 ALGOLINTRN - "CTOD" TERMINATES ABNORMALLY 

Under certain conditions, the CTOD intrinsic would terminate with an "INVLD SQRT ARC. This 
problem has been corrected. 

P3 325 ALGOLINTRN - CORRECT "DSQRT" ERRORS 

Two classes of errors in the Double Precision Square Root Intrinsic have been corrected. 
Square Roots of values which are double precision integers would not work because of incorrect 
normalization of the value. Also, very large numbers were handled incorrectly. Both of these 
errors have been corrected. 

P3326 ALGOLINTRN - CORRECT "GAMMA, DGAMMA" 

Both GAMMA and DGAMMA produced results for negative integers and zero. These values now 
produce errors since the function is undefined at these values. 
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D3628 ALGOLPLINTRN - "ALGOLPLINTRN" SUBSUMED BY " GENERALSUPPORT " 

Effective with the Mark 32 release, the ALGOL/PLI intrinsics have been subsumed by the 
GENERALSUPPORT library, described in GENERAL note D3354. 
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D3076 ATTABLEGEN 



"APL" FILE ATTRIBUTE 



The file attribute APL has been implemented for disk/pack files to satisfy APL access 
restrictions. It may be set prior to the creation of a new file, and is effective only if the 
codefile creating the file itself has the attribute set. The attribute may be read any time the 
file is open. An attempt to open a file with APL set will cause the accessor to be DSed unless 
it al so has APL set. 



D3425 ATTABLEGEN - DELETE "PORTS, SIGNALS" 

Attributes and mnemonics for PORTS and SIGNALS have been removed, 
mnemonic for the task attribute OPTION has been removed. 

D3656 ATrABLEGEN - LASTSTATION SYNONYM "= LASTSUBFILE" 



In addi t ion, 



the PORTS 



A synonym for the LASTSTATION file attribute has been added, LASTSUBFILE. LASTSUBFILE is 
preferred name, which will be displayed on attribute error messages to either name. 



the 
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P3 626 ATTABLEOEN - "ROWSIZE=504 " FOR NEW PATCH 
ATTABLEGEN now uses the standard rowsize of 504 segments for its output patch. 
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BACKUP 

D3587 BACKUP - "HOSTNAME" MODIFIER 

BACKUP syntax has been extended to allow "HOSTNAME=<s t ring>" . This causes the output to be 
printed at the host named by <string>. Appearance of this option causes the ND option to be 
set, as direct I/O is not allowed across a network. 

Example : 

PB D 12 34 HOSTNAME=" HONOLULU" 
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P3 3 27 BACKUP - "BFILE" LABEL EQUATION 

When running BACKUP, with ND set and BFILE label equated to certain devices such as disk or 
tape, bad output would be obtained because the device could not handle the printer backup 
file's carriage control information. This problem has been fixed. For each printer space or 
skip, BACKUP will now write a blank line if the device can not handle the carriage control 
i n forma t ion . 

P3658 BACKUP - "FILE. TITLE" ATTRIBUTE 

A problem has been corrected where a backup file name with multiple levels (not including the 
task number and modified file name) would give an attribute error. The error only occurred 
when IDOPTION was set. 
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BARS 



D2978 BARS - "SYSTEM/BARS" UTILITY 

The SYSTEM/BARS utility, described in the Mark 31 system notes, has been revised for the Mark 
32 release. The following note describes the SYSTEM/BARS utility; revisions for the Mark 32 
release are indicated by PCN bars in the right margin. 

The SYSTEM/BARS utility monitors the system's performance and displays it in the form of 
numeric values and bar graphs. Various system performance parameters are sampled and may be 
displayed in a user-controllable format on screen-type terminals. 

Performance elements are represented by a bar on the screen. "The format of each bar is 
###XXX. . . where the #'s extend to the minimum value seen, the X's extend to the current value, 
and the .'s extend to the maximum value seen. The display is updated every 'cycle' seconds, 
where cycle is a parameter which is dynamically variable from the terminal, and a running 
average is maintained over a user-set tabl e period. 

The following verbs are used to control the display: 

HELP (alias TEACH) 

Displays this information. 

CYCLE Controls the sampling and terminal update interval. 

PERIOD Several values are computed as running averages using the formula: 

NEWAVERAGE : = 

(OLDAVERAGE * (PERIOD-CYCLE) + NEWVALUE * CYCLE) / PERIOD 

PERIOD changes the value of period. If PERIOD < CYCLE, no averaging is done (i.e. 
the exact value is displayed). 

NEWDISPLAY Modifies the format and content of the screen. Each item on the screen is 
specified by giving a key word followed by N's for the value field and B's for the 
bar graph (both N's and B's are optional); for example: 

Idle NN BBBBBBB 

will produce a display of the form: Idle 45 ###X. Text may be placed on the screen 
by placing it within single quotes: 'xyz'. The valid key words and their meanings 
can be displayed with the WORDS verb. A default display is supplied by the 
program. The NEWDISPLAY input that creates it can be displayed with the DISPLAY 
verb . 

DISPLAY Displays the input that would create a specified display screen. Three options 
exist: 

DISPLAY Shows the NEWDISPLAY input for the current screen. 

DISPLAY DEFAULT 

Shows the NEWDISPLAY input for the default screen. 

DISPLAY <file name> 

Shows the NEWDIS.'LAY input for a screen SAVEd in the specified file; 
e.g. DISPLAY X/Y ON P. 

SAVE <file name> 

Saves the current display in the specified file; e.g. SAVE X/Y ON P. 



LOAD 



Loads a previously generated screen as the new screen. The options for DISPLAY are 
also valid for LOAD: 



LOAD 



Loads the current display. The screen does not change. 



WORDS 



LOAD DEFAULT 

Loads the default screen for monolithic systems. 

LOAD TCDEFAULT 

Loads the default screen for a B6800 multiprocessor system. 

LOAD TCMEMORY 

Loads a screen giving overlay information for each memory structure of a 
B6800 multiprocessor system. 

LOAD <file name> 

Loads a previously SAVEd display. 

Displays the allowed key words for the NEWDISPLAY input plus a short description 
of their meaning. 



PACK (alias PK, alias PERPK) 
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Displays the names, channel numbers, and family indicies of the packs currently 
on-1 ine . 

STED Displays the number of tasks "SUSPENDED BY THE SYSTEM" as opposed to those stopped 
by either the operator or programat i cal 1 y . 

BYE Ends the program. 

The program begins by executing a LOAD DEFAULT command. The program is initialized to a 
different display if the file DISPLAY is label-equated to a SAVEd file; for example, FILE 
DISPLAY(TITLE=MY/SCREEN) . 

If the file MONITOR is label-equated, the program will write the raw performance data to that 
file as it is received from the MCP; for example, FILE MONITOR(TITLE=XX) . 

D3277 BARS - VIRTUAL MEMORY UTILIZATION MEASURE 

BARS now has the ability to display the quantity of virtual memory (overlay space) actually in 
use by the system. The information may be displayed as a total for the system or box-by-box. 
Virtual memory data for swap tasks is also available. For batch tasks, the new keywords BVMEM, 
UVMEM-1, BVMEM-2, BVMEM- 3 , BVMEM-4 and BVMEM-G are used for monolithic or tightly-coupled 
summary information, and box number 1, 2, 3, 4 and * GLOBAL tm Memory, respectively. Virtual 
memory display for SWAPPER is invoked via the keyword SVMEM. The SWAPPER data is available 
only as a system-wide summary. The new items may be displayed similarly to OLAY, AVAIL, SAVE, 
etc. 

* 'GLOBAL Memory" is a trademark of Burroughs Corporation. 
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P2909 BARS - PROCESSOR TIMES REPORTED ON MONOLITHIC SYSTEMS 

BARS was incorrectly computing the processor time allocations on monolithic (B6700, B7700 and 
1-processor B6800) systems. This has been corrected. 

P2910 BARS - CORRECT SWAPCORE GRAPHS 

If a B6800 Multiprocessor system had non-identical local memory configurations, the bar graphs 
for swapcore could be incorrectly displayed. This has been corrected. 

P3110 BARS - INCOMPLETE DISPLAY ON SYSTEM "ODT" 

When BARS is run from the system ODT, lines of data or partial lines of data would sometimes be 
erased. This problem has been corrected. Each screen update will now result in the correct 
di splay . 

P32 51 BARS - CLEAR CHANNEL INDICATORS PROPERLY 

The last channel accumulator was not properly being cleared between updates. Now, the 
accumulator will be cleared with all the other channel accumulators. 

P3464 BARS - "SCREEN" FILE ATTRIBUTE 

When the file attribute SCREEN is used in BARS, an error "ILLEGAL FILE ATTRIBUTE" would occur 
because SCREEN is already defined within the program. This problem has been corrected. 

P3481 BARS - CHANGES TO TYPE "4 SYSTEMSTATUS " CALL 

BARS has been modified to accommodate the changes described in MCP-GENERAL note D3S00. 

Channel wait conditions can only be reported for MPX systems. The needed information is not 
available on MLIP systems, and BARS will not attempt to display it on these. 

P3642 BARS - "<MORE>" DISPLAYED COMPLETELY 

Running BARS in SPO mode, the output message to indicate an additional page of information was 
displayed as "ORE>" on the top line instead of " <MORE> " on the bottom line. This problem has 
been corrected. 

P3643 BARS - "SPO" MODE DISPLAYS LONG MESSAGES 

Running BARS in SPO mode and entering "MSG" caused a SEG ARRAY error if the messages were long 
(full) lines. This problem has been corrected. 

P3644 BARS - NEGATIVE "IDLETIME" 

It was possible to obtain a negative value for IDLETIME in certain situations. BARS has been 
corrected to display only values of or greater IDLETIME. 

P3645 BARS - SINGLE "."AS INPUT 

Running BARS in SPO mode and inputting a single "." caused an output <MORE> loop. This problem 
has been corrected; the message "UNRECOGNIZED REQUEST" is displayed in this case. 
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D3538 BASIC - MATRIX INVERSION FUNCTION 

The matrix inversion function INV wi 1 1 on occasion complain that the matrix to be inverted is 
singular, even though that is not the case. The problem is data dependent, as the function 
works correctly in many cases. 

D3539 BASIC - "APPEND" STATEMENT 

The APPEND statement was never fully implemented. APPEND is able to add records only within 
the last block of a file, because BASIC files are closed with CRUNCH. If a program attempts to 
add records past the last block, an end-of-file condition may occur. 

Another known problem is that data written to a file after using the APPEND statement may not 
appear on the file if the file were previously opened input. 

D3540 BASIC - "UP-ARROWS" REQUIRED FOR EXPONENTIAL FIELD 

On pages 7-17 and 7-18 of the BASIC Reference Manual (Form No. 5001407), four consecutive 
percent ('%) symbols appear in the explanation and example for exponential fields in PRINT/WRITE 
USING. The percent symbols are not literally the correct characters in that case; the percent 
symbol is used to represent the up-arrow character which is actually required. 

The sequences of four consecutive percent characters should be replaced by sequences of four 
up-arrow characters. 

D3603 BASIC - PROGRAM OF UP TO "2048" STATEMENTS 

The compiler will now accept programs of up to 2048 statements. 

Add the following sentence to Page 1-7 of the BASIC Reference Manual (Form No. 5001407): 

"A program may contain up to 2048 statements." 
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P3612 BASIC - ERROR FOR "DEF" FUNCTION 

A syntax error is now generated when the number of parameters supplied during invocation of 
DEF function is different from the number of parameters declared for that function. 

P3622 BASIC - FLAG QUESTION MARK AS INVALID CHARACTER 

The character "?" (question mark) is now flagged as an invalid character. Previously, 
caused the compiler to ignore the remainder of the line. 

P3 664 BASIC - ERROR ON FIRST PROGRAM TOKEN 

The compiler will no longer abort with an INVALID OP if the first token in the program is 
quoted string. The appropriate syntax error is now generated. 
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D3002 BINDER - CODE FILE NAMING CONVENTION FOR "ALGOL'' 

The following change to the BINDER Reference Manual (Form No. 5001456), is necessary because 
there is no SEPARATE option in ALGOL or ESPOL. 

Change the second sentence under Pragmatics, Page 5-4, to read as follows: 

"When compiling one or more subprograms, the FORTRAN compiler (when the SEPARATE option is 
SET) the PL/I compiler (when the MULTIPLE option is SET), and the ESPOL and the ALGOL 
compilers will create one or more code files with a title formed by replacing the last <file 
identifier) of the code file title on the compile card with the name of the separate 
subprogram. " 

Add the following sentence to the last paragaraph on Page 5-4: 

"LIBRARY is set to TRUE automatically when compilation of an ALGOL or FORTRAN program is 
initiated f rom CANDE. " 

D3414 BINDER - DELETE OLD INTRINSICS 

Since XALGOL is no longer supported, the INTR1INSICS and the BINDER references have been 
del e ted. 

PL/I was changed on Mark 30 PR1 release so that the compi 1 er re fe£fnces the MCP's 
ATTRIBSEARCHER. Therefore, ATTRIBSEARCHER has been deleted from the PL/I INTRINSICS. 

The old BASIC intrinsics have been deleted since the codefiles which reference these are no 
longer supported. 

D3487 BINDER - "MCP" CODE FILE ROW SIZE = "504" 

The MCP no longer has any code segments large enough to require that the MCP code file have a 
row size of 1008 disk segments. 

The NEWP compiler and the BINDER will now construct an MCP code file with a row size of 504 
segments, as is done for other code and symbol files. 

D3495 BINDER - INSTALLATION INTRINSIC WARNING 

The BINDER now issues the following warning when requested to bind installaton intrinsics: 
"BINDING INSTALLATION INTRINSICS WILL BE DE- IMPLEMENTED ON 34" 

GENERAL note D3354 describes the overall plan for replacing intrinsics with support libraries. 
D3562 BINDER - "INTER-LANGUAGE" PROCEDURE PARAMETERS 

The BINDER does not allow inter-language binding of procedures that have procedure parameters. 

For example, a FORTRAN subroutine that has a parameter declared EXTERNAL may not be bound into 
an ALGOL host that declares an appropriately-named EXTERNAL procedure that has a procedure 
parameter . 

ALGOL HOST: 
BEGIN 

PROCEDURE Pl(PP); 

PROCEDURE PP(X); INTEGER X; FORMAL; 
EXTERNAL; 
PROCEDURE P2(I); INTEGER I; 
BEGIN 

e:nd ; 



END. 



P1(P2); 



FORTRAN SUBROUTINE: 
SUBROUTINE Pl(PP) 
EXTERNAL PP 
INTEGER I 



CALL PP(I) 
END 
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The BINDER Reference Manual (Form No. 5001456) has never clearly stated this restricton- the 
following text should be added to the BINDER manual: 

Page 7-2A, at the end of the PARAMETERS paragraph: 

"Procedures may not be passed as parameters between ALGOL and COBOL." 

Page 7-5, at the end of the PARAMETERS paragraph: 

™»™f d , u I es ' functi o«s and subroutines may not be passed as parameters between ALGOL and 
FORTRAN. 

Page 7-7, at the end of the PARAMETERS paragraph: 

"Subroutines and functions may not be passed as parameters between COBOL and FORTRAN." 

Page 6-1, at the end of the ALGOL SUBPROGRAM paragraph: 

"For the most part, ALGOL, DCALGOL and DMALGOL are considered to be the same language. 
Mixing procedures of these three languages via binding is considered to be INTRA-LANGUAGE; 
however, the BINDER considers these languages to be distinct when dealing with formal 
procedure parameters. As with all other inter-language binding, passing formal procedure 
parameters between these languages is prohibited by the BINDER." 

D3566 BINDER - ARRAY BOUND CLARIFICATION 

Passing array parameters between ALGOL and FORTRAN should be clarified in the BINDER Reference 
Manual (Form No. 5001456), by adding the following to sub-paragraph 1 of the PARAMETERS 
paragraph on Page 7-5: 

"For ALGOL arrays passed to FORTRAN routines, the ALGOL subscript value of zero corresponds 
to FORTRAN subscript value one. For FORTRAN arrays passed to ALGOL, the FORTRAN subscript 
value used in evaluating the parameter (the value one is used if no subscript is specified) 
corresponds to the ALGOL subscript value zero." 

D3577 BINDER - "MCP BIND" EXAMPLE 

The WFL subroutine WFLCOMP on Page 14-2-9 of the SOG Reference Manual, Volume 2, (Form No 
5001688), should have an additional $ option, LIBRARY, added following NEWSEQERR. 

On Page 14-2-10, the following four lines: 

BIND WFL FROM SYSTEM/=; 

BIND OCSTRINGCONV FROM SYSTEM/=; 
BIND CCVARIABLEPPB FROM SYSTEM/=; 
BIND CCSTRINGFUNCTION FROM SYSTEM/=; 

should be replaced by the following: 

BIND WFL, CCSTR I NGCONV, CCVARIABLEPPB, CCSTRINGFUNCTION FROM SYSTEM/WFL; 
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P3010 BINDER - MULTIPLE REBINDS OF "SYSTEM/INTRINSICS" 

When rebinding the SYSTEM/INTRINSICS, the BINDER was not properly updating the binding 
information stored in the code file. A subsequent rebind would then improperly allocate stack 
addresses, resulting in unusable intrinsics. This problem has been corrected. 

P3328 BINDER - BINDING "FORTRAN" ROUTINES 

The FORTRAN compiler on the initial Mark 30 software release (30.140) built incorrect Binding 
information for some intrinsics. This problem was fixed on the 30 PR1 release and the initial 
Mark 31 software release. FORTRAN routines compiled with the 30.140 compiler could not Bind to 
programs created with other compilers nor to programs created with earlier or later FORTRAN 
compilers. Now, those FORTRAN routines created with 30.140 compiler aire properly bound. 

P3360 BINDER - CORRECT "$WAIT" WITH <MIX NO.> "OF" 

The $WAIT option causes the BINDER to wait on a "NO FILE" RSVP when a required input file is 
missing. If the response to one of these "NO FILE" situations was an OF (Optional File) 
response, the BINDER would use this response for all future "NO FILE" instances. 

This problem has been corrected; the BINDER wi 1 1 only interpret the OF as a response to a 
single "NO FILE" RSVP. 

P3419 BINDER - BINDING WITH "D[0] " INTRINSICS 

When a user procedure contained calls on D[0] intrinsics, the BINDER did not correctly fix all 
references to called procedures, thus causing an INVALID OP when attempting to call the D[0] 
procedure. This problem has been corrected. 

P3587 BINDER - BINDING PROGRAMS WITH " SDATADICTINFO" 

The BINDER was generating "ASSERT=FALSE" error messages when binding COBOL code files with 
SDATADICTINFO set. This no longer occurs. 
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CANDE 



D3249 CANDE - "VISIBILITY" TASK, "SCATTER" RUN-TIME OPTIONS 

Int roduc t ion 



This note describes CANDE's interaction with the new semi dependent task feature of the MCP. An 
understanding of that feature (described in MCP-GENERAL note D3252) is assumed in the following 
di scuss ion. 

Semi-dependent tasks permit a parent running in a local box of a B6800 Multiprocessor system to 
have offspring in other local boxes, subject to certain visibility constraints. The user tasks 
spawned from CANDE meet these requirements, but certain actions must take place to allow the 
system to run these offspring to the fullest advantage. These are described below. The term 
"offspring" refers to user tasks (i.e., COMPILE, EXECUTE, UTILITY). 

VISIBILITY Attribute 



The VISIBILITY task attribute can be specified as a run-time task modifier; 
VISIBILITY=GLOBAL" . Values for the attribute are checked via ATTRIBSEARCHER. 



e.g. 



"RUN X; 



Scat t er i 



"g 



There are two reasons for running CANDE in a local box. First, it may be desirable to limit 
CANDE and all of its offspring to that local box to permit the other local box(es) to run free 
of interference from that source. Second, CANDE may be run in a local box to maximize its 
performance, with the intent to run user-initiated offspring in the most optimal part of the 
overall B6800 Multiprocessor system. 

In either of these cases, the site must take some overt action to allow or prevent the 
scattering of the offspring. Because of the current semantics of the SUBSYSTEM attribute as 
applied to CANDE, the default is to run offspring in the same local box as CANDE, and the new 
CANDE run-time option SCATTER (#13) is set to allow CANDE's offspring to run in other local 
boxes . 

If SCATTER is set, CANDE sets the tasker stack's SUBSYSTEM to null; this allows the MCP to pick 
an appropriate subsystem at task initiation time. If the option is reset, CANDE sets the tasker 
stack's subsystem to its own (main CANDE stack) value. 

The minimum abbreviation for SCATTER is "SCAT". The setting of this option is maintained in 
the tankfile in the same manner as the other options. If the value of SCATTER is changed, the 
effect of the change does not occur until the next initiation of the tasker stack. 

The revised syntax for the CANDE options command is the following: 

— ?OP 1 



+ - 



SWAPALL 

ALLLOGIN — 
DIALLOGIN - 
KEEPSTA — 

ALLMSG 

CATDEFAULT 
CATALOGOK - 

DUMPOK 

SCATTER 



Operational Considerations 

Following are five possible ways to run CANDE to achieve various results. The method selected 
may be controlled by site management to achieve optimum performance in their environment. 

1. Run CANDE in global; scatter both the worker stacks and the user tasks to the local boxes: 
This remains the default. 
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2. Run CANDE in global; scatter offspring in some local boxes: Compile CANDE with an 
appropriate multiprocessor subsystem specification with default VISIBILITY. 

3. Run CANDE and all the workers in any one of several local boxes, but scatter the user tasks 
among all those boxes: Compile CANDE with an appropriate multiprocessor subsystem, and with 
VISIBILITY=MINIMAL. 

4. Run CANDE and all offspring in a single local box: Compile CANDE with an appropriate 
single-processor subsystem specification with default VISIBILITY. 

5. Run CANDE and the workers in a single local box, but scatter user tasks acros « the system: 
Use method 3 or 4 and set the SCATTER option to avoid propagating CANDE s SUBSYSTEM 
at t r ibut e . 

Note that SYSTEM/CANDE can be compiled or bound once with a special SUBSYSTEM specification, 
say "CANDESUBSYS". Then method 1 , 2 or 4 above can be achieved merely by changing the 
definition of CANDESUBSYS, via the MS ODT command, to specify all, some, or one of the 
processors on the system, respectively. 

The capability to run CANDE in local with the workers in several local boxes cannot be offered, 
since the worker processes are fully dependent and use their visibility into the parent stack. 

D3364 CANDE - AUTOMATIC "DESTNAME" FOR "CANDE" SESSIONS 

The DESTNAME as applied to tasks executed through CANDE provides a means of specifying a 
non-CANDE station for the task's printed output. This note describes a facility to specify a 
DESTNAME for a complete session, automatically supply that DESTNAME when a task is executed and 
to control the setting of the automatic DESTNAME. 

This implementation presumes that the physical configuration of an installation is relatively 
static. For example, an RJE terminal used to provide printed output for program compilations 
will probably stay "near" the programmers who use it. Thus the DESTNAME. for a session is 
Issc-cUted with a user, and the user's default DESTNAME is kept in the USERDATAFILE This 
default is supplied on all task executions explicitly initiated by the user as well as 
CANDE-initiated tasks (e.g. CANDE WRITE) . 

The user may change the DESTNAME for some portions of a session, revert to the default value, 
or interrogate the current value. One possible value is null; that is, the DESTNAME value may 
be set so that no DESTNAME is supplied for a task execution. The user may also override the 
current DESTNAME by explicit specification on a run or compile request. 

If the permanent value of the DESTNAME is to be changed in the USERDATAFILE, SYSTEM/MAKEUSER 
may be invoked by the installation. 

Syntax : 

— DESTNAME 

-<station name>- 

. * 



If no input other than the DESTNAME verb is entered, CANDE reports the current value of the 
DESTNAME If the <station name> is supplied, it is saved by CANDE as the current value until 
another DESTNAME action takes place. The input "*" causes the current value to revert to the 
user's default, and the input "." causes the DESTNAME to be set to null. In the latter case, 
no DESTNAME is supplied by CANDE on any task execution request. 

As indicated in the syntax diagram, the minimum abbreviation for DESTNAME is DEST. 

There are no changes in the RUN (EXECUTE) statement syntax If a DESTNAME is explicitly 
supplied, it overrides the current value for the session for that request only. There is no 
abbreviation for DESTNAME on the run request. 



and REMCP<nn> 
e 




files are found. 



The USERDATAFILE entry is made using the word CANDEDESTNAME, which is of type FILE (that is, 
station name has the form of a file title). 
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D3370 CANDE - FULL SCREEN SEQUENCE MODE 

The ability to use a full TD8xx screen for CANDE sequence mode has been available for several 
releases, but has not been recently documented. If a TD8xx terminal is removed from scroll mode 
(?-S) and sequence mode is requested from CANDE, the entire screen is set up for sequenced 
input. Multiple lines must be separated with a carriage return, and sequencing may be 
terminated (as in single-line sequencing) by inputting an ETX or carriage return character 

cCim™ /cAr t iD/-.Si l iA I racter P osition of «"» offered line. This facility is provided by the stanc 
o YMBOL/SOURCENDL . 



idard 



This note is documentary in nature only; no modifications to the system software are involved. 
D3456 CANDE - "FILES" <FILENAME> : <DEPTH #> 

In the CANDE Reference Manual (Form No. 5011398), the second paragraph of the discussion of the 
FILES command (Page 4-30) should read as follows: 

"The <depth> option indicates the number of levels of <file identifier beyond the supplied 
<file name> or <directory name> which will be listed (if present)." 

In the syntax for <directory name> on Page 3-1, <name> should be changed to <file identifier). 

D3544 CANDE - "COPY/ADD" STATEMENT 



The syntax specification for the COPY/ADD statement in the WFL Reference 
5001555) should be changed to read as follows: 



Manual (Form No. 



& CATALOG - 

AND -I I- BACKUP — 




The syntax specification for the COPY/ADD statement in the CANDE Reference Manual (Form No 
5011398) should be changed to read as follows: 



— COPY 

I- ADD — - ft — COMPARE 



>-<l ibmaint file list> 



ft CATALOG - 

- BACKUP — 




D3 5 80 CANDE 



PASSING STRINGS VIA "WFL/CANDE" 



When WFL or CANDE pass a string to a program as a parameter, they use a word array just large 
enough to hold the string plus one null character. If the declaration of the parameter in the 



receiving program is longer than the size of the string passed by WFL, 
occur . 



run-time error may 



Such run-time errors do not occur on the Mark 30 release, because WFL at that time copied the 
string into a 256-charact er array before passing it to a program. Thus, WFL was erroneously 
allocating too much stroage for the string. This was an oversight which was corrected o 
Mark 31 release; it is now implemented as intended. 



the 
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D3642 CANDE - "CANDE" VS. FOREIGN TASKS 

THE ?STA command to CANDE now provides the mix number and hostname for foreign tasks run from a 

CANDE terminal . 
D3646 CANDE - COMPILER TYPE "FORTRAN77" 

CANDE now recognizes the filekind FORTRAN77. The corresponding CANDE type is F77. 
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P2798 CANDE - "SCHEDULE" RESTART PROBLEMS 

The^fffef/w,^?,^*^' WBS " 0t ? ickin « U P the ri «ht restart point under some circumstances 
I. »U a \.V % • ° C8USe res » ar t ■* the * r °"8 Point in the session or to fail to resta 
from ih/In \ a ,low,n « rest ?': t / the beginning of the block containing the end of the outou 
hav^ been corrected" 8 ' °* C ° U ' d ^ ° verwritten with incorrect informatfon. Both these proems 

P2 833 CANDE - MISSING "SCHEDULE" OUTPUT FILE 

CANDE could fault if errors occurring in the SCHEDULE input file were renorten in » 
non-e*. stent output file. These errors are no longer reported if the Hie does not Hi s t . 

P3200 CANDE - SCHEDULE REQUEST ON UNNAMED WORKFILE 

A request to schedule an unnamed workfile without specifying the outout r i 1 *- titi. »,. 
Jor°^?h-i y ^ Pr0 Tr ing J," "V"V "INVALID NAME: SCHOUT?" followed by som^incor c. f e tiUe 
(or garbage) The problem has been corrected by having CANDE notice that the workfile has no 
name and display the message "#WORKFILE NOT NAMED" . worxtue has no 

P3329 CANDE - MISSING "SCHOUT" FILE 

V„!! e SrHn?£ ?!r cun,stan <=?s..a» ""empt to u P date th <> SCHOUT file caused a DIVIDE BY ZERO fault if 
the SCHOUT file were missing. This problem has been corrected. 

P3420 CANDE - SECURE SCHEDULE FILES PROPERLY 

The security of the schedule output file is now set to PRIVATE when it is created. 
P3421 CANDE - ALLOW SETTING CHARGECODE TO NULL 

IhLw^'f^ 1 ?!! S6t a char «" od « Jo null was not consistent with the other code in CANDE which 
checked for the presence of a chargecode. This problem has been corrected 

P3422 CANDE - "TAPE" COMMAND IN "DO" FILES 

?l^^H°w„!„°fi. a tape command in a D f i,e ™" ld cause all following commands in the file to be 
flushed when the TAPE command was completed. This problem has been corrected. 

P3423 CANDE - RECOGNIZE "NDL" SEQUENCE MODE TERMINALS 

CANDE was examining the wrong field in its attempt to determine whether a terminal had NDL 
sequence mode capabilty. This problem has been corrected. terminal had NDL 

P3424 CANDE - SECURITY PROBLEM 

A security problem in CANDE has been corrected. 

P3425 CANDE - "CANDE" CREATES BAD TANKFILE 

!ncnmnlI NT ? RC °" Q ^ E ,- 0U i d " 0t £? ? et up f °"°wing creation of a new tankfile, the new (but 
incompletely initialized) tankfile would not be saved. This could cause „ „bl™« „ 

.nmaM,zed: n,t,at,0n ° f "^ ^ "^ fUe U "° W Saved °" ,v af ' » »" h.. a "«S'°c«pl et^ly 
P3426 CANDE - SCHEDULE SESSIONS VS. CHARGECODES 

fo^plevfou^algfc^ haS """ " dded - This a ' ea " as overlooked during 

P3460 CANDE - "CANDE" ERRORS NOW ATTRIBUTED TO USER ERRORS 

Internai rc CA^E^r^Im K " ?f DE err ° rS WCre - ° rig , inallv devised *° notifv th <= »ser of an 
internal CANDE problem. These errors are in reality caused by inconsistent software lev*!* or 
by jmproper user input (possibly due to hardware malfunction; e . g . , no sy Sat a loZ 1 ineT The 
following error messages are now emitted for these situations: i»ne). The 

"FILE LABEL EQUATION ERROR" instead of "FILECD" 
or 

"FILEKIND OF WORKFILE INCOMPATIBLE WITH THIS MCP" instead of "UTLTSK" . 
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P3499 CANDE - ALOW MORE THAN "2" DIGITS 

CANDE now prints out all digits of a job queue insertion notice for queue numbers above 99. 
P3500 CANDE - "CANDE DS" FOR SECURITY VIOLATION 

A problem has been corrected that led to occasional termination of a CANDE worker stack for 

SECURITY VIOLATION. 

P3501 CANDE - PACKNAME WITH LEADING DIGIT 

Under some circumstances, a packname with a leading digit (e.g., 32PACK) would not be scanned 
by CANDE as a legitimate packname. This no longer occurs. 

P3535 CANDE - BACKUPPROCESSOR FINDING END OF BLOCK 

If a sequence range request to Backupprocessor began with the last record of a block, and if 
that record were the blank (second) line of a double space, CANDE could fault or produce 
incorrect output. Such conditions are now handled properly. 

P3536 CANDE - "EOL" CHARACTER IN "DO" STATEMENT 

Thp F/)L character was not being recognized in a statement started with a DO verb unless the 
charter was ne Tast non-olank character on the input line. The EOL character is now treated 
as a "stopper" character for the scanner; all further information .n that record is .gnored. 

P3571 CANDE - FOLDING LOWER CASE TOKENS 

The criterion for splitting (folding) lines did not properly account lor strings including 
lower-case characters. These token are now treated as single ent.ties in the same manner as 
upper-case tokens. 

P3574 CANDE - "SEG ARRAY" ERROR IN "DCWER" 

A SEG ARRAY error could sometime occur in procedure DCWER if DCSYSTEMTABLES returned a long 
message. The message is now truncated to prevent the error. 

P3613 CANDE - STATION VS. TERMINAL SETTINGS 

CANDE was taking the TERMINAL setting for its TERMWIDTH value for a station event even though 
^hViTATION value m.ghl be different (and therefore override the TERMINAL value). Th.s problem 
has been corrected. 

P3691 CANDE - HANDLING LINE ERRORS 

CANDE has a mechanism to detect frequent errors from stations or lines that are disconnected or 
malfunctioning; the offending station or line is eventually left not-ready. 

This mechanism has been inoperative for line errors from non-switched limes. wi * h r ,* h * resu, « 
that CANDE could be overloaded handling error messages. This problem has been corrected. 

P3692 CANDE - "END JOB" ON "WFL" STATEMENT 

CANDE no longer puts an "END JOB" on a WFL statement. 

For those WFL statements containing an "AT <hn>" , no "END JOB" can be included. 

For those WFL statements to be executed on the local host, the WFL compiler appends the "END 
JOB". 

P3785 CANDE - ALLOW "4-CHARACTER" VERBS 
Previously, CANDE unconditionally sent only 3-character verbs. Now, CANDE calculates the 
length of the verb and passes that many characters to the CONI KOLL.HK . 
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DOCUMENT CHANGES NOTES (D NOTES) 
COBOL 



D3003 COBOL - BINDING AND STATISTICS 

! t , is no longer poss j b i e to bind progranls wit h SSTATISTICS set. If STATISTICS is set, no bind 
info will be generated and the compiler will issue a warning message. 

D3223 COBOL - "BCL" WARNINGS 

The warning "BCL PROGRAMS ARE NOT PORTABLE TO EBCDIC MACHINES" is now given for a VALUE clause 
in a file declaration or with a SET statement which specifies VALUE(BCL) for the INTMODE 
a 1 1 r ibut e . 

D3359 COBOL - MODIFICATIONS TO SUPPORT PORT FILES 

Port files aredeclared and used much like Remote files in COBOL. (See Mark 32 GENERAL 




SELECT <file-name> ASSIGN TO PORT 

[ ACTUAL KEY IS <da ta-name-1 > ] 

[ FILE STATUS IS <data-name-2> ] 

The ANSI74 construct FILE STATUS is a Burroughs extension for port files. The ANSI74 
dollar option need not be set if the FILE STATUS is being used for a port file. 

The general syntax for read and write statements on port files is as follows: 

READ <file-name> RECORD [ WITH NO WAIT ] [ INTO <identifier> ] 

[ INVALID KEY ... ] 

WRITE <record-name> [ WITH NO WAIT ] [ FROM <identifier> ] 

[ INVALID KEY . . . ] 

If no Actual Key clause is declared for the port file, a read or write statement 
performs a non-selective read or a broadcast write. 

If an Actual Key is declared, the user is responsible for updating the Actual Key with 
the appropriate value of the subfile he wishes to reference. Read statements cause the 
Actual Key to be passed to the I/O system, where it is accessed and updated. If the 
Actual Key is zero, a non-selective read is performed, and the Actual Key is updated to 
indicate the subfile which is the source of the message. If the Actual Key is 
non-zero, a read from the specified subfile is performed. Write statements cause the 
Actual Key to be passed to the I/O system to indicate the desired subfile destination 
A zero will cause a broadcast write. 

If l |jSiTc tUa - i£ ey is less than zero or greater than the value of MAXSUBFILES, the READ 
or WRITE will result in a "subfile index out of range error. The status key will 
indicate this error with a value of "34". 



A read statement normally causes the program to wait until a message is available, and 
a write statement normally causes the program to wait until a buffer is available to 
m!?i e , e messa 8f-, The possibility of this suspension can be prevented by using the NO 
WAIT clause on either a read or a write statement. The status key value "94" indicates 
that no message was available for the read. The status key value of "95" indicates 
that no buffer was available for the write. 

The OPEN statement has been extended to allow the use of two features relevant to port 
files: opening the file if it is available and opening the file when it is offered by 
a v?{J 1 !fDTE r0 ? eSS ' These options may be invoked by specifying the word OFFER or 
AVAILABLE immediately before the file name in the Open statement. A port file may be 
opened with the options I-O, OFFER, or AVAILABLE. For example: 

OPEN I-O PORTA. 
OPEN OFFER PORTB. 
OPEN AVAILABLE PORTC. 
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Xse"of KIND^^o «.; A'VJS.. j|j value ^/^ indicates that^te « 

If -00 ? will be returned, although the subfile has not been opened. 

The CLOSE sta.en.ent has also been extended to allow "Jeature relevant to port fll... 

syntax for the NO WAIT option is as follows: 
CLOSE <file-name> [ WITH NO WAIT ]. 

The NO WAIT option is mutually exclusive with all other CLOSE options. It is allowed 
only for port files. 

A status key value of "00" indicates that the CLOSE statement executed co""* 1 *:. * 
status key value of "82" is returned if an error occurred during the execut.on of the 
CLOSE statement. 

"ndtclltes that the entire file is to be closed or opened as spec. tied. 

^menrorcO^ "The^synt.x^for 1 the ViV. attribute" ident^f i^ts . a. so'used^oT 
event^alueS fiU^tribltes. TneVlT statement is available in CoSbL ,. these two 
formats : 

Format 1 : 

WAIT <ari thmet ic-expression> 

Format 2: 

WAIT [<ari thmet ic-expression>J 

<event-valued-file-attribute> . . . 
[ GIVING <identifier-l>] 

"!o„". " "oioo to be troo. ■he d.l. itam rcf.re.o.d b, ,do„t.f..r-l to the 

? K'-aausatt ■ir.- , w ?f5i.:':iW,K ssst.f ii^'r. re i-iss. 

operand in the variable N: 

WAIT 1, PORTA (CHANGEEVENT) , 

PORTB (CHANGEEVENT) GIVING N. 

COBOL designates subfiles as parenthesized expressions following; the file name, 
shown in the following example: 



as 



PORTA (3, CHANGEEVENT) 
D3449 COBOL - IGNORE NONFUNCTIONAL CHARACTERS 
Add the following statement to the discussion of Continuation Indicator (column 7) on page 3-1 
of the COBOL Reference Manual: (Form No. 5001464) 

"e. Any other character which appears in column 7 is ignored." 
D347 3 COBOL - EDITING THE VALUE ZERO 

11 " "° ! [f ^ ^reaterM 1 ^ 'negtllve 'nuSoef excfpl ' In the°case where a^nume^ITcha^er 
^s?ti:n ! i\n b the t edH e pICTURE a str,nrar e represented ly insertion characters (deserved on Page 
6-67 of the COBOL Reference Manual, Form No. 5001464). 
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D3491 COBOL - "TIME" FUNCTION IN "DIVIDE" STATEMENT 

The special registers TIME(n) and COMPILETIME(n) , described on pages 2-13 and 2-14 of the COBOL 
Reference Manual, Form No. 5001464, may not be used in the DIVIDE statement. 

D3503 COBOL - OPTION "4, MOVE" VERB 

Wrap-around is permitted when using option 4 of the MOVE verb; therefore, the restriction that 
the source-bit or des t mat lon-bi t minus the number of bits must not be less than -1 has been 
removed (as described in the COBOL Reference Manual, Form No. 5001464, Page 7-82) The number 
of bits to be moved, however, must still be less than 48. 

D3504 COBOL - VALUE CLAUSE FOR "COMP-4.COMP-5" ITEMS 

If the usage of an item is COMP-4 or COMP-5 , all literals in the VALUE clause must be floating 
point literals (see Page 6-95 of the COBOL Reference Manual, Form No. 5001464). 

D3505 COBOL - "OPEN EXTEND" ON VARIABLE LENGTH FILE 

The EXTEND option of the OPEN statement cannot be used with variable length files. 

D3510 COBOL - LIMIT ON "SIZE" CLAUSE 

The SIZE clause of a data-item is limited by a maximum value of 65535. Exceeding this value 
will give a compiler error. This is true even for fixed-length group items where the SIZE 
clause is used for documentation purposes only. 

D3517 COBOL - PASSING STRINGS FROM "WFL" TO "COBOL" 

When WFL passes a strrng as a parameter, it uses an exact size word array to pass the strine 
If the declaration of the parameter in the COBOL program is greater than the size of the 
string, a run-time error will occur. 

The run-time errors did not occur on the Mark 30 system software release because WFL on that 
release copied the string into a 256-charac t er array and then passed the character array to the 
COBOL program, thus erroneously overal loca t i ng space for the string. This error had sone 
unnoticed; now, it is implemented as intended. g 

D3520 COBOL - "IPC, USE AS EXTERNAL PROCEDURE" STATEMENT 

A program with a "USE AS EXTERNAL PROCEDURE" declarative is not marked IPC-capable. 

Effective with the Mark 32 system software release, the IPC-capable bit is no longer necessary. 
D3521 COBOL - ERROR LIMIT OF "150" 

Under the LIMIT paragraph on Page 13-16 of the COBOL Reference Manual (Form No. 5001464) the 
fourth sentence should read as follows: '' 

for'^'cANDE 1 " '* aSSUmed ' f no LIMIT value is specified except when compilation is called 
D3523 COBOL - UNITS=CHARACTERS 
The MCP for optimization purposes uses UNITS=WORDS for COBOL files when 

(MAXRECSIZE MOD 6)=0 and UN I TS= CHARACTERS 
Therefore, setting UNITS to CHARACTERS will have no effect. 
D35 24 COBOL - REFERENCING TWO OR THREE DIMENSIONAL ARRAYS 
Page 6-18 of the COBOL Reference Manual (Form No. 5001464) should contain the following 

S I 9 I CHIC DI ! ™ 

"When a two- or three-dimensional array is declared using the INDEXED BY <index-name-l > 
. option, the array may not be referenced using data-names." 

D3541 COBOL - CLOSE ON A DISK FILE 

On Page 7-47 of the COBOL Reference Manual (Form No. 5001464), under item number 3 for close 
tile-name with release, the following sentence: 

"For an old file, same as CLOSE file-name." 

should be replaced by the following sentence: 

"For an old file, the output areas are released, and that particular instance of the file is 
no longer logically associated with the program." 
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D3570 COBOL - "RECORD AREA" 
The following should be included in the COBOL Reference Manual (Form No. 5001464), Page 5-14, 
as the second sentence: 

"The length of the RECORD AREA specified to be used for direct I/O must be an even number of 
characters . " 

D3648 COBOL - "TB" RESERVED WORD 

The table of reserved words on Page A-13 of the COBOL Ref erence Manual (P°« No. 5001464) 
should include the reserved word TB under the following system options: B6700, ANSI74. 

D3658 COBOL - PARAMETER PASSING 
Add the following paragraph to the COBOL Language Reference Manual (Form No. 5001464) as Item 9 
on Page 7-42: 

The parameters in the USING clause may not be declared with a REDEFINE clause." 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
COBOL 

P2701 COBOL - "INVALID INDEX" IN "COBOL" COMPILER 

The handling of error recovery in the RELEASE statement was causing an INVALID INDEX in the 
COBOL compiler. This has been corrected. 

P2702 COBOL - "USE" ROUTINE NOT INVOKED 

A USE AFTER STANDARD ERROR PROCEDURE was not invoked when parity errors occurred on a tape file 
with variable length records. This has been corrected. 

P2703 COBOL - " VALUE (TERM I NATED ) " 

The compiler no longer generates a one (1) instead of a negative one (-1) when the attribute 
mnemonic VALUE (TERM I NATED) is referenced. aitnoute 

P2704 COBOL - "WAIT" STATEMENT 

I. h ™ c SST?4-! e r inc ? rr ? c !! y generated two items of binding information (PCWs for TIMETUNNEL and 
SUPERWAIT) for the following statement: 

WAIT 60, EVNT GIVING R 

where EVNT i s an event variable. The BINDER changed the PCW for the WAIT statement twice and 
generated invalid addressing code. This has been corrected. 

P2705 COBOL - "IF" STATEMENT GENERATES BAD CODE 

The COBOL compiler generated incorrect code for the following statement: 

IF <real literal> <relational op> arithmetic expression) 
STATEMENT 1 ELSE STATEMENT2 

This has been corrected. 

P2706 COBOL - RESULTS OF EXPONENTIATION IMPROVED 

The results of exponentiation sometimes gave less than full decimal precision when both 
operands to the exponentiation were single precision (less than 12 decimal places). 

This has been corrected. 

P2707 COBOL - BINDINFO FOR "77 COMP" GLOBAL ITEM 

If the ANSI74 option was set in a COBOL program, bind information for a 77 level COMP item was 
not generated. This has been corrected. 

P2708 COBOL - INVALID SYNTAX FOR FILE ATTRIBUTES 

The COBOL compiler did not generate a syntax error message for invalid syntax for file 
attributes with parameters. This has been corrected. 

P2727 COBOL - COMPILATION SUMMARY 

At the end of compilation, the message "COMPILED ON THE B6700 (B7700) FOR THE B6700 (B7700)" 

S?^n Pr '? ted ' Th,S messa « e would be incorrect if the compilation had been done on a B6800 or 

Fnl Tlip Bf.nnn^nSnnn? 1 !*"?!!? 156 V U "? W be P rinted; "COMPILED ON THE (B6700/B6800/B7700/B7800) 
FOR THE B6000 (B7000) SERIES", where the appropriate options will be printed. 

P2728 COBOL - "INVALID INDEX" 

™!LT yntaX ? rror recover y in the handling of subscripts was causing an INVALID INDEX in the 
COBOL compiler. This problem has been corrected. 

P2729 COBOL - "NEWSEQERR" $ OPTION 

The $ option NEWSEQERR was accepting equal record numbers without flagging an error, therebv 
locking the NEWTAPE file. This problem has been corrected; the COBOL compiler now gives a 
warning message, and the NEWTAPE file is not locked. 

P2732 COBOL - INTRINSIC INFORMATION IN GLOBAL DIRECTORY 

BINDER will now correctly bind intrinsics used by subprograms to those intrinsics used in the 
host program. 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 COBOL 



PAGE 125 
B6000 SERIES MARK 32 

P2813 COBOL - "OPEN O-I FILE1 1-0 FILE2" 

, k ,,1 .„ open O-I FILE1 1-0 FILE2 statement. Previously, 

The compiler will now correctly handle an OPEN O 11 

FILE2 would be opened as output. 
P2815 COBOL - "INVALID OP" IN "IF" STATEMENT 

The handling of exponentiation in an IF statement has been corrected. 
P2834 COBOL - INTERACTION OF "OPEN" STATEMENT ^ 

the file is opened. 

P2835 COBOL - "STOP RUN" 

•nin onTO" This has been corrected 

A STOP RUN statement in a COBOL library was causing a BAD GOTO . 

(with support of the MCP) . 
P2932 COBOL - "$" OPTIONS "SEQERR, NEWSEQERR, SEQCHECK" 

„l so nroduced if the previous sequence number was comprised of spaces and the 
The warning was al so P roduced * 'aces This has been corrected, 
current sequence number is also spaces. 

P3054 COBOL - CALL USER INTRINSIC 

A ..„ ,. .„ ...... .... ...-.».. .-".- • — <•'••• - "• -* " ""•■•■ — * 

has been corrected. 
P3055 COBOL - "INVALID INDEX" IN REPORT WRITER 

a in the COBOL compiler when compiling the report writer section 
An INVALID INDEX which occurred in the COBOL compiler 
of very large COBOL programs has been corrected. 

P3080 COBOL - INDEXED FILE WITH INVALID KEY BRANCH 

rs . , -„j...j file an EOF NO LABEL error 

For a WRITE statement with an inval id key clause of an ^dexed t , . ^ ^ n k 

would occur and discontinue execut on if the e «m t ^ end of the file 

causing the invalid key clause to taken howe ver trying ^ ^ ^ of the flle and 

r.;!?«:r k .;: B :!i. t i:«^i 1 «-ti- &t,..u ». be taken. 

P3081 COBOL - "RERUN" CLAUSE 
Syntax checking in the RERUN clause has been corrected. 

P3205 COBOL - CALLS ON UNTYPED USER INTRINSICS 
The compiler no longer generates erroneous code for a CALL of a user intrinsic in which the 

parameters were passed by value. 
P3262 COBOL - "LIBRARY CALL" WITHIN "IF" 

r. . TIBRARY CALL within an IF statement is no longer ignored by the compiler. 
The statement after a LIBRARY call wimm 

P3274 COBOL - EQUAL COMPARISONS 

i[ f ?.::!::"?ir 15 ".:■ sstta' K -sat".*:?:! ~:ft.':= st.ffiU .:•»,■ sj: 

problem has been corrected. 
P3275 COBOL - GROUP COMPUTATIONAL MOVES 
The code generated for a group move of computational items no longer references an invalid 
descriptor . 

P3276 COBOL - ERRONEOUS SYNTAX ERROR 

, 1.7 certain MOVE statements would cause the 
When a program was compiled at a lex level > „*■ °*ii ERROR" . MOVE statements that translate 
Ha H fi h.'US^f'.SS-^r:;""":"!: tf* o^would cause the compiler to issue this 
erroneous message. This problem has been corrected. 
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P3294 COBOL - SYNTAX CHECKING WITH "NEXT SENTENCE" CLAUSE 

7i t J.if:^[! M St - :i:s r ,K t ASr , siibasB o ^ii." w Th u ! d ;v ob ^ c LVLir- r ti\v d s for nested 

P3295 COBOL - SYNTAX ERROR IN "IF" STATEMENT 

'^"»!«%%:"r2,:.f' t ' T i:T:%i: b ?.: o Ki t j~: i e »?: e «»: wou,d cause the -*"« - »»■• an 

P3302 COBOL - "OBJECT-COMPUTER" CLAUSE SYNTAX 

disk size to be appied to the sort. clause (e.g., DISKPACK) would cause the default 

P3 303 COBOL - "ANSI 74" DEFAULT LINE SPACING 

lefaun^spaclnrof^BEFORE^VANctNl 1 !" was'n" ° Pti ° n h V. b "» corrected. The incorrect 
the ANSI7? optfon had bee^ Zl when* the oSbol'cSM 1 er ' , , sel FV " d ot '*™ ADVANCING r when 
subsequent $ option cards in the program being compi fed! compiled and there were no 

P3304 COBOL - "LINE NUMBER" CLAUSE SYNTAX 

The compiler will now correctly handle a I INF ntimrcp „i. 

llZllVtll. ' dUP,iCatC "^NUMBE^cta^fsur^nalr?: a'Hepor tfep d^rTptfon'would'go 

P3305 COBOL - "MERGE" STATEMENT SYNTAX 

SI7F C °^? L com P iler . "0*, flags a MERGE statement containing either a DISK «i 7 p , 

SIZE clause as invalid syntax. Previously the conn??.? *i¥ . I, SI ? E claus c or a MEMORY 
syntax; ,..,..„. it generated incorrect code'whlch could ^ause'thT sj s tV to'Sang 88 " ** inValU 
P3306 COBOL - LONG CONDITIONAL EXPRESSIONS 

While evaluating a condition containing more than 99 In.i^.i 

would get a SEG ARRAY error. This no long" occSrs lo « lcal operators, the COBOL compiler 

P3 307 COBOL - "KEYSPERENTRY" GREATER THAN "63" 

KEYsKnTR^*^ OF ID Cause, accessing the 

of records to be expected during creat.ono? affile " W ° U ' d CaUSe a Ascending sequence 
P3427 COBOL - "INVALID INDEX" 

H-aT'or^al^^ .. either a numeric 

usage of the object was being set incorrectly INVALID INDEX during the evaluation if the 

Ex amp 1 e : 

IF AAA (1) = SPACE ALL "*" 1 2 OR 3 
where 

01 A 

03 AA OCCURS 10. 
05 AAA PIC X. 

This problem has been corrected. 

P3465 COBOL - MAXIMUM NUMBER OF LIBRARIES EXCEEDED 

The compiler no longer terminates with an INVALID Imtiby „i,.„ *u 

are exceeded. invalid INDEX when the maximum number of libraries 

P3466 COBOL - RESERVED WORDS SYNTAXED IN "WRITE" STATEMENTS 

The COBOL compiler no longer fails with an IMVAT in fwncv >. 

used in WRITE statements. INVALID INDEX when reserved words are incorrectly 

P3467 COBOL - "INVALID INDEX" WITH "CP CALL" 

The COBOL compiler would fail with an INVALID IlsinFY if ,i , . 

statement were a reserved word. Thfs no longer occur s . con l r °l-PO> n t-i dent i f i er of a CALL 
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P3 502 COBOL - MISALIGNMENT OF "COMP-2" SYNC VALUES 

COMP-2 sync values are now properly aligned against a word boundary. 
P3503 COBOL - "SEGMENT" CLAUSE, "01" RECORD 

The following problems have been corrected: 

, Use of the SEGMENT clause caused the compiler to issue a COMPILER ERROR message. 

2. References to an 01 record that had an OCCURS clause caused the compiler to generate bad 
code . 
P3525 COBOL - TIMESTAMP DIFFERENCES 

Previously, the date and time of a compiler listing and the date ^nd^tim^ of "•^•"j | j 

nsl?ng d ind e Ue f code a f^e g I?stTng C wi!ragree ar8 Th: time and Sate used are those from the 

beginning of the compilation. 
P3538 COBOL - "ISAM" "CLOSE" OPTIONS 

as..'&s , KJ.-«is ttfssi su as: •w-.s'is-.-s-rasi:. « -"< ™ .»■■■ 

P3559 COBOL - "MONITOR," WRITE TO SAME FILE 
P3561 COBOL - "ISAM" EXTERNAL FILE NAMES 



selected in a user 



ine compinci wi»» ■■«" „ :* > 

VALUE OF ID clause. Previously, 

name . 
P3562 COBOL - "COPY" WITH BAD FILE TITLE 



incorrect file name. 



B:,:s!i:',a ,, f..rT. srsiiui'Jte .:..2S. ^src'-jia .s.. 

P3563 COBOL - OPERAND LEFT ON TOP OF STACK 

ii „„ , n intrinsic in an arithmetic statement would cause the 
Sn C er r io^enira?e S rdrUat fS'f! llrll^VnV^ top of the stack. This no longer occurs. 

P3581 COBOL - "COMP-2" NUMERIC TEST 

A hex "F" will now be considered a valid sign ^racter^in a numeric clas^ tes^ of a CO - 

item. Previously, the compiler treated hex C s ana 
P3679 COBOL - USER INTRINSICS AT LEVELS "> 2" 

Calls on a user intrinsic when thecode was compiled at a level greater than 2 would somet.mes 

cause a compiler error. This problem has been corrected. 
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DOCUMENT CHANGES NOTES (D NOTES) 



D3010 COBOL74 - FILE DESCRIPTION ENTRY 

Non-numeric literals used at the end of VALUE OF clauses will no longer require a period at the 

D3222 COBOL74 - CLOSE "WITH LOCK" 

The 1974 ANSI standard requires that files which are closed "WITH lnri[« „..„.. . 

reopened by the program. Because thl ZUrnrn .»!„. J ?u- • . cann °t subsequently be 
CLOSE option "WITH SAVE" Sas been provided 'S ? 1 mAAl vl* ' '1° ' '^ WaS anti ^P»ted, the 
a mass-storage file permanent while I so allowing r [ ou 8hs COBOL74 extension intended for making 
LOCK" option continues to make I mass-s toraie f l! il™5n» "S""? by the P r °8 ra,n - The "WITH 
and can be used as long as the logical m^.s not rlopenlo " d makC '"^ U " ,tS " NOT READY " • 
D3224 COBOL74 - "BCL" WARNINGS 

The warning "BCL PROGRAMS ARE NOT PORTABLE TO EBCDIC machimbc- ; «, 

attribute" -"»•»«•" " with a CHaSgI I?.?S.f SK™. ! f i ^Ml^lJ ?.™ff INtSoDE 

D3358 COBOL74 - MODIFICATIONS TO SUPPORT PORT FILES 

GENERAL"; 6 M.!r^l«..J.T!o. 0^0^ . es " * ' for '"d °°^ L74 - ^ M " k 32 
COBOL74 recognizes the va?ue PORT* for ?he KIND a Haute" ana eS aTi Pt o? n the^HH • ! '" " \ 
attributes and values related to port files Fill* «lt h!?? i\ ■ e . ad d't'°nal 
and f an e O P tional Actual Key clause ...'.. "dec la^Ml icV^alToe^ed '^"'refeS 

SELECT <file-name> ASSIGN TO PORT 



t ACTUAL KEY IS <dat a-name-1 > ] 

[ FILE STATUS IS <data-name-2> ] 

The general syntax for read and write statements on port files is as follows: 
READ <file-name> RECORD [ WITH NO WAIT ] [ INTO < ident i f i er> ] 

[ INVALID KEY . . . ] 

WRITE <record-name> [ WITH NO WAIT ] [ FROM <identifier> ] 

[ INVALID KEY . . . ] 

If no Actual Key clause is declared for the oort fil* » r»„j 

performs a non-selective read or a broadcast w?ite. Wr " e statement 




or t WRITE tU w!n e V S !f ss . than ze™ ° r greater than the value of 
or wriie will result in a "subfile index out of ranee ermr 
indicate this error with a value of "34". 8 



MAXSUBFILES, the READ 
The status key will 




nu? PE ^i„^r%^e a nu ee if e it te ^ va ? la a b !r a „s e useof r ^? tures "'—< «° p— 

another p?ocesf. The e op ion may be v d^!'" 8 th % f ! ,e wh ' n il «« offered by 
AVAILABLE immediately before the fi 1 en.m??„?i. I specifying the word OFFER or 
opened with the option's I^OFFER, 'or ^VaTlABLE^FoT c^ampl IT * ' A P °" '"' may be 
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OPEN 1-0 PORTA. 
OPEN OFFER PORTB. 
OPEN AVAILABLE PORTC. 

«... op.io^.,.,™...;., •■tiaia.-s.5S."!, /^..^K^irSB 

options. The OhfiSK 15S_ » 7717... i»v value of "00" indicates that the wren 
those of KIND equal to PORT A st.tu va^ue o |§ returned if an error 

statement executed correctly. A «J|»» {^.^"Vt. that for OPEN OFFER a 
occurred during the execution of the OPEN •***•"• has occur red, a status key value 

of^OO* w!« n b."r.?««3.""£i-^i^ »i'»- S » »ot been opened. 

The CLOSE statement has also been extended to allow ajeature^relevant ,. p^ f.lg ; 
^spenllon can'oe^d"^^^ ,Se W^NO WAIT option on the CLOSE statement. The 
syntax fo? the NO WAIT option is as follows: 
CLOSE <file-name> [ WITH NO WAIT ]. 

. n„ „Hnuve with all other CLOSE options. It is allowed 
The NO WAIT option is mutually exclusive witn an 

*!•!::■■ lAffiiVr : - \r\iv."Sv, a«.ss'.:i:i3-i..:s , a?..s'.!!- , sj •- 

CLOSE statement. 

For OPEN and CLOSE UaU.nt, .the user is Responsible for ^'^^value oTzero 

t^c^erinat I^In^rl^ if ff s^o' Se^ed or opened as specified. 

The event-valued f i le at tributes relevant to port f i {« ■£• ^? f" ^ e f s also'uted for 

^nrvaIued%i^tIribut^ e T»rWAIT°; t a^me f n!%ravai«^ in COBOL74 in these two 

formats : 

Format 1 : 

WAIT <ari thmet ic-express ion> 

Format 2: 

WAIT [<ari thmet ic-express ion>] 

<event-valued-f i le-at t ribute> - . . 
[ GIVING <identif ier-l> ] 

Format 1 is used for waiting the specified number of seconds or^f ra^t ion^ t hereof 
Format 2 may be used for wait .ing for only one event °' nume ric integer data 

and events. <«dent if ier-l> must be described as a When GIVING is specified, 

iir.:::t?L'J:»:ssl* I, ijf.S *,-;;:«.;; :s.!'s: .« .tir a 
sis. s: r ?i::ri. ii*.T"T ;j:'KS\.»".i"K«i i, »....»«.-. » •-« 

iS's'-M-siMSsw •s":i"S.:"'.m:: i?..3"K: -- "i- »'.»: 

awakening operand in the variable N: 

WAIT »' attrIbSt! SSStH? of portb'giving n. 

COBOL74 designates subfiles as parenthesized expressions following the file name. as 
shown in the following example: 

ATTRIBUTE CHANGEEVENT OF PORTA(3) 
D3 505 COBOL74 - "OPEN EXTEND" ON VARIABLE LENGTH FILE 

The EXTEND option of the OPEN statement cannot be used with variable length files. 
D3531 COBOL74 - ERROR LIMIT OF "150" 
A limit of 150 is assumed if no LIMIT value is specified except when compilation is called for 
by CANDE. 
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D3 5 74 COBOL74 - DATA COMM INTERFACE LIBRARY 

control system' eoScept is Sot to be confi ed w??h thl r' " de j; ,Ce £- (The ANSI74 '"essage 
concept.) Messages are comu c e h» the Burroughs Message Control System 
devices and systfm s t rue turTare known o" the OTbAi 7S Pe " den ' svmbolic ma "^'- Specific 
generality between the compiled pToiram and ^S? !!,*?"? °" ly Symbo1 icaI ,v • Thi * 
interface called the Data Communication! nte ce (DC?! tIV A^V 8 achiev ^ via an 
.b.l.t.e. ,n the compiler to the specific Sev^cenee^of an^piuln^ 1 " 8 the « ener * 1 

J?:.^*^ :Jir■^.:2 b 7;!? ,, ?ss.s?:? l,e ^*^^:." r ?5:ss?* »^«r« . aw™ prograB 

ib^iyreference is built with the internaTnaml ' 'IJCILIBRARY?' A r ept < CD ~ N ^>- ■ This 
•DCIENTRYPOINT'. This entrypoint is an'unt ip^ro.S^I'WJ eigh"? pa'rame^er^ ' " * ""« 
1) Integer, by value : The DCI function having values - 

1 Accept 

2 Disable 

3 Enable 

4 Receive 

5 Send 

2) Ebcdic Array (unindexed descriptor) : The CD having the COBOL74 description - 

For Accept, D * J •b^ljj™ » • Enable Input, or Receive: 

02 QUEUE-NAME PIC Xfl2) 

02 SUB-QUEUE- 1 -NAME PIC Xf m ' 

02 SUB-QUEUE-2-NAME Pl C Xf m " 

02 SUB-QUEUE- 3 -NAME PIC X? m 

02 MESSAGE-DATE-NAME Pic 9^6^ 

02 MESSAGE-TIME-NAME pic 9(»{' 

02 SOURCE-NAME P i C XM2i 

02 TEXT-LENGTH-NAME Pic 9(4? 

02 END-KEY-NAME PIC X 

02 STATUS -KEY-NAME pi C XX 

02 MESSAGE-COUNT-NAME PIC 9(6). 

For Disable Output, Enable Output, or Send • 
01 CD- ARRAY. 

02 DESTINATION-COUNT-NAME PIC 9(4) 
02 TEXT-LENGTH-NAME PI C 9(4)' 
02 STATUS-KEY-NAME PIC XX 

02 of s issrzr NAME °ss?s < int > times - 

03 DESTINATION-NAME PIC X(12). 

zfr „:ve r or ^r p *a.?e sa me:„i" put no Enab,e "#■ V *™ iV < ■ <»° n ? »p- et ^ 

output, and Send the Output cS " have an^Inte^r F °. ° iSab,e ° UtpU * ' Enabl e 
U^^^' '"if •' the^ray ( J ^IW-^^V^OTH^O, ^V 



4) 
5) 



6) 



Ebcdic Array (unindexed descriptor) : The Message Arr=,v nr v 

f"' / me message Array or Key password. 

IVutVcl^oVlll ar^^ ° p i rime', e^nu^er ' %'*' *S T^" r (The '»«"■ in 
contained in this array is ma i ^ IneYbT^e 'S^' i n^he 'S^lii^SS'S ' °" 

Integer, by value : The End Indicator or I/O type - 

For Send or Receive, the End Indicator would be: 

1 ESI (end of segment/ Receive segment). 

2 EMI (end of message/ Receive message). 

3 EGI (end of group). 
And for Disable or Enable, the I/O type: 

1 1 Input Terminal . 

12 Input. 
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7) Integer, by reference : The Advancing type or Suspend No Data Indicator - 

For Send, the Advancing type: 

1 After Lines. 

2 Before Lines. 

3 After Channel . 

4 Before Channel . 



And for Receive, the Suspend No Data Indicator: 



<value> ■ * m i» » - 

Suspend program amount if No Uata. 

, f this Parameter is zero then a No Data clause w.. .. f pl . ed^wi th^the 

ReCC T tVVAt If no data is available, thS DCI Library would 
return* a° boolean' t^tn'value (i.e. an odd value) in parameter seven 
(passed by reference). 



8) 



Integer, by value 



Advancing Value for Send, otherwise zero. 



The second parameter the CD array allows co^unicat io, .between ft C0B0L74 f PJ^am^and 
paLefby \IV Sompi ,S? ^&l P \l^Wll\VVo\\,**t ing information in the CD array 

it receives* 

The information in the CD shou U be ^.«e d i ■^•••'JJ^; £ pages^XII Tttl* secK 
according to the rules as "quired by tne «*»»J specify details concerning the 
updoing' Vf^temsVtneVar-ray -h^ ettTng -1 es of P the Status Key, collection of 
message!, nandling queues, and password validity checking. 

The DCI library can be written in any language including COBOL ALGOXor DCALOOL, >; , lowing 
access to disk files, remote files, or por t lies »« * COBOL standard can be 
tIf?oi:rtr^nr^artTc„. e ar t, a^;ic:tton Se U s; '^DCI^orary. A typical DCI library 
written in COBOL would declare parameters as follows: 



$SET ANSI 74 

IDENTIFICATION DIVISION. 
PROGRAM- ID. DCIENTRYPOINT. 
ENVIRONMENT DIVISION. 
DATA DIVISION. 
LINKAGE SECTION. 
77 DCI-FUNCTION 
01 THE-CD 
01 INPUT-CD 

02 SYMBOLIC-QUEUE 

02 SYMBOLIC-SUB-QUEUE- 1 

02 SYMBOLIC- SUB-QUEUE- 2 

02 SYMBOLIC- SUB-QUEUE- 3 

02 MESSAGE-DATE 

02 MESSAGE-TIME 

02 SYMBOLIC- SOURCE 

02 TEXT-LENGTH 

02 END-KEY 

02 STATUS -KEY 

02 MESSAGE-COUNT 
01 OUTPUT-CD 

02 DESTINATION-COUNT 

02 TEXT-LENGTH 

02 STATUS-KEY 

02 DESTINATION-TABLE 

03 ERROR-KEY 

03 SYMBOLIC-DESTINATION 
77 THE-CD-OCCURRENCES 
01 THE-MESSAGE. 

3 THE-MESSAGE-SUB 



7 7 THE-MES SAGE-LENGTH 

77 IO-OR-END-INDICATOR 

7 7 NO-DATA-OR-ADVANC I NG-TYPE 

77 ADVANCING- VALUE 

PROCEDURE DIVISION 

USING DCI-FUNCTION, 
THE-CD, 



COMP PIC 9. 

PIC X(244). 
REDEFINES THE-CD. 

PIC X(12). 

PIC X(12). 

PIC X(12). 

PIC X(12). 

PIC 9(6). 

PIC 9(8). 

PIC X(12). 

PIC 9(4). 

PIC X. 

PIC XX. 

PIC 9(6). 
REDEFINES THE-CD. 

PIC 9(4) . 

PIC 9(4). 

PIC XX 
OCCURS 1 TO' 18 DEPENDING 
ON THE-CD-OCCURRENCES. 

PIC X. 

PIC X(12). 
COMP PIC 999. 

PIC X 
OCCURS 1 TO 256 DEPENDING 
ON THE-MES SAGE-LENGTH. 
COMP PIC 999. 
COMP PIC 99. 

COMP PIC 99 BY REFERENCE. 
COMP PIC 99. 
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THE-CD-LENGTH, 

THE-MESSAQE, 

THE-MES SAGE-LENGTH , 

IO-OR-END- I ND I CATOR , 

NO-DATA-OR-ADVANC I NG-TYPE 

ADVANCING- VALUE. 
MAIN SECTION. 
PI. 

PERFORM WHATEVER-FUNCTION 
EXIT PROGRAM. 

D3597 COBOL74 - FILE HANDLING DIFFERENCES 

Tu e : 0mpi wrth Un Jgu ,y diMui[!^ ti \L d T/o i VulT S , t0 «•»•»'-«-»» OOBOL74 files from COBOL68 
word-mode files for COBOL^?' though" thaf ulXlVlfil "con^ue roVSk&l'"*"*"* <"'* '° 
All calls on the I/O subsystem will also distinguish COBOL74 from COBOL68. 
D3659 COBOL74 - "D" LINES, "FREE" OPTION 

ljur p ma„ y pr.l a#: ^tr[:?;o ns i of^oBor;ni i ?ei , a Ld whe The c FSEE , o P ?io n hrou f h b cande > 

when using a debugging line in the program. relaxed. The FREE option must be reset 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
COBOL74 

P2701 COBOL74 - "INVALID INDEX" IN "COBOL" COMPILER 

The handling of error recovery in the RELEASE statement was causing an INVALID INDEX in the 
COBOL compiler. This has been corrected. 

P2703 COBOL74 - " VALUE (TERM I NATED ) " 

The compiler no longer generates a one (1) instead of a negative one (-1) when the attribute 
mnemonic VALUE (TERM I NATED) is referenced. 

P2705 COBOL74 - "IF" STATEMENT GENERATES BAD CODE 

The COBOL compiler generated incorrect code for the following statement. 

IF <real literal> <relational op> arithmetic expression> 
STATEMENT 1 ELSE STATEMENT2 

This has been corrected. 

P2706 COBOL74 - RESULTS OF EXPONENTIATION IMPROVED 

The results of exponentiation sometimes gave less than full decimal precision when both 
operands to the exponentiation were single precision (less than 12 decimal places). 

This has been corrected. 
P2727 COBOL74 - COMPILATION SUMMARY 
At the end of compilation, the message "COMPILED ON THE B6700 (B7700) FOR THE B6700 (87700); 

S 7 l00 Pri rmore alcuratrm-ag^ 

FOR THE B6000 (B7000) SERIES", where the appropriate options will be printed. 

P2728 COBOL74 - "INVALID INDEX" 
Bad syntax error recovery in the handling of subscripts was causing an INVALID INDEX in 
COBOL compiler. This problem has been corrected. 

P2800 COBOL74 - "SERIALNO" ATTRIBUTE 
In the VALUE OF clause of an FD statement, SERIALNO may now be set to a non-numeric literal 
length six. 

P2801 COBOL74 - NON-NUMERIC ATTRIBUTES 
The period which was necessary at the end of the literal in the CHANGE ATTRIBUTE statement for 
non-numeric attributes is now optional. 

P2815 COBOL74 - "INVALID OP" IN "IF" STATEMENT 

The handling of exponentiation in an IF statement has been corrected. 

P2819 COBOL74 - CLOSE FOR MULTI-FILE TAPES 

Previously, if a CLOSE statement were executed for an output file on a multi-file tape. J h <; 

file was cosed and the tape was rewound; hence, subsequent output files, if any, on the 

multi-me tape couU not be written. Now, the file will be closed, but the tape will not be 
rewound . 

P283 5 COBOL74 - "STOP RUN" 
A STOP RUN statement in a COBOL library was causing a "BAD GOTO". This has been corrected 
(with support of the MCP) 

P2851 COBOL74 - "SOPTIMIZE" COMPILER ERROR 

$SET OPTIMIZE was causing a compiler error at the end of the PROCEDURE DIVISION. This has been 

corrected. 
P2931 COBOL74 - "SIGN" CLAUSE FOR COMPUTATIONAL ITEM 

The SIGN clause has been implemented for computational items. 



the 



of 
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P2932 COBOL74 - •$■ OPTIONS "SEQERR, NEWSEQERR, SEQCHECK" 

If the $ options SEQERR or NEWSEQERR in COBOL or the $ option SEQCHECK in COBOL74 are set and 
the sequence numbers are not in ascending order, a sequencing warning wi 1 1 be produced . 

™rr^, rl, i!! 8 W8S also P r °duced «' the previous sequence number was comprised of spaces and the 
current sequence number is also spaces. This has been corrected. P 

P2937 COBOL74 - FILE ATTRIBUTES 

B^OLEANTYPE an TisKfYPE S?°F&SStwp ' H ? S ' ' ' 5 ' ! statements using attributes of the ARITHMETICTYPE, 
MUULHAN1YFE, TASKTYPE or EVENTTYPE did not compile. This problem has been corrected. 

P3055 COBOL74 - "INVALID INDEX" IN REPORT WRITER 

o? v^Iar.fc^BSL^roSr-l"^ 'k '^ C ° B ° L c ° m P iier when compiling the report writer section 
ui very targe \mbul. programs has been corrected. 

P3060 COBOL74 - "WRITE AFTER ADVANCING PAGE" STATEMENT 

* ™™ AFIBR ADVANCING PAGE statement which was associated with a file having a linage clause 
resulted in one extra blank line being printed. This problem has been remedUd * 

P3070 COBOL74 - "SEQCHECK" S OPTION 

TockinR Pt {he SS™CE W ??le CCe U,^ g '"H?' 'Z eOT t nun,bers without flagging an error, thereby 
locKing tne NfcWiOURCE f l 1 e . This problem has been corrected; the COBOL74 compiler now eivei a 
warning message, and the NEWSOURCE file is not locked. compiler now gives a 

P3081 COBOL74 - "RERUN" CLAUSE 

Syntax checking in the RERUN clause has been corrected. 
P3084 COBOL74 - DEBUG LINE VALUES 

The value of the following debug-lines in the special register debug-item has been corrected: 

START PROGRAM - identifies the first statement of the first 

non-declarative procedure 
FALL THROUGH - identifies the previous statement 
SORT - identifies the beginning of the SORT 

statement 

Also, the scanning of debugging lines when the dollar option FREE is reset has been corrected. 
P3086 COBOL74 - "WRITE" STATEMENT WITH "FOOTING" EQUAL TO " 1 " 

..^IlVi!!!?^ T hi0h Wa ? associa ted with a file with a linage clause where the FOOTING was 
set to 1 resulted in pagesize attribute errors. This is now handled correctly. 

P3274 COBOL74 - EQUAL COMPARISONS 
If a subscripted item were compared for equality against another item and their lengths were 
!;££"£■£;. bee e n IZXl'tU"'" 9 * thC Wr ° ng ° Pfirat0r ' CaUSi "« the comparison to'tlll* K" 

P3294 COBOL74 - SYNTAX CHECKING WITH "NEXT SENTENCE" CLAUSE 

With the OPTIMIZE dollar option set, the compiler would not catch all syntax errors for nested 
IF statements that used the NEXT SENTENCE clause. This problem has been corrected 

P3295 COBOL74 - SYNTAX ERROR IN "IF" STATEMENT 

^rr^n^ eSeS a f ound a data name in a conditional statement would cause the compiler to issue an 
erroneous syntax error. This problem has been corrected. 

P3 308 COBOL74 - LINAGE - FOOTING VALUE OF ONE 

acc^rdTng^ANsi 7 ° "t lord's ^ ' "^ C ' aUSe " d ' footU « »'" ° f ° ne is »°" *>"<»'* 
P3395 COBOL74 - "BDMS" FEDERAL LEVEL WARNING 
The following Federal warning is issued when a BDMS construct is used: 
"BURROUGHS EXTENSION EXCEEDS U.S. HIGH LEVEL" 



B6000 SERIES MARK 3 2 RELEASE OS NOVEMBER 1980 COBOL74 



PAGE 135 
B6000 SERIES MARK 32 

P3465 COBOL74 - MAXIMUM NUMBER OF LIBRARIES EXCEEDED 

The compiler no longer terminates with an INVALID INDEX when the maximum number of libraries 

are exceeded. 

P3525 COBOL74 - TIMESTAMP DIFFERENCES 

Previously the date and time of a compiler listing and the date and time of the code fj le 
could dffer for a program which took a large amount of compilation time. Now the compi er 
Hsting and the code file listing will agree. The time and date used are those from the 
beginning of the compilation. 

P3564 COBOL74 - "COMPUTATIONAL'' NUMERIC TEST 

* h„v -F» »,i11 now be considered a valid sign character in a numeric class test of a 
COMPUTATIONAL ?tlm Previously, the compile? treated hex "C"s and hex "D" s as the only valid 
s igns . 
P3826 COBOL74 - LIBRARY PSEUDO TEXT REPLACEMENT 
A pseudo-text match failed in the case where the library text contained a debugging D line. 
This problem has been corrected. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
COMPARE 



P3614 COMPARE - "ARRAY TOO LARGE" ERROR 

filef^o'he'cnl^?^ ?f 6 ? T ith thC " ror »" sage " ARRAY TO ° LARGE " if the MAXRECSIZE of the 
iiies to be compared is a large number of characters. 
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DOCUMENT CHANGES NOTES (D NOTES) 
CONFIGURATOR 



D3406 CONFIGURATOR - SOFT CONFIGURATION 

The Mark 32 release supports soft reconfiguration of both B6800 and B6900 systems (see Mark 31 
lotes D2861 and D2867 ?S? an explanation of B6800 soft reconfiguration). It has been necessary 
to expand the definition of a GROUP to include the B6900 I/O subsystem configuration. 

B6800 configuration file group descriptions contain the following major sections: processor, 
global memory? operations, and peripherals. The B690O group d.,«ripno. .1 s °' n ^ de S fo »" £ 
iection, which describes I/O subsystem connectivity on a base by base basis. Syntax tor tne 
base section is as follows: 

GROUP Statement : 

BEGIN — GROUP — <group id> — <processor section> > 



>— I , 

|-<global memory section>-| | -<operat i ons section>- 



> ~ 7 

-<I/0 section>-| | -<per ipheral section>- 



END GROUP— ; 



<I/0 section> 

I/O: <base list> 



<base 1 i s t> 

|<— /319\ 

BASE — <base id> — <host list> 



<base id> 

<base bus address> / <base bus number) — 

<base extension number> 

SEMANTICS : 

Th 
bi 



The base id is a 16-bit field strap and is composed of three fields: ma ntenance b «? e add '" s <* 
bits) maintenance bus number (4 bits), and tl»e base extension number (4 bits). The first two 
f elds make up the <unique base id> and, as the name implies, must generate a unique id wi hin 
any system. The 4-bVbase extension number is the upper 4 bits of a unit number. Currently, 
this field must be zero. 

<hos t 1 i s t> 

!<__ /6\ I 

< independent host> — -- <dlp list> — ; 1 

I — <dependent host> | 

< independent host> 

HOST <host number> 1 

SEMANTICS : 

An independent host is a processor which has a,a MLI connection into a base. The host number 

must match the processor id. 

<dependent host> 
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LJISm i« • ^ i C h 2 S a " MLI connection in to » base. With the cooperation of the 
h!?! vL host, an independent host can send I/O operations through the dependent host to the 
base, For example the Network Support Processor, is capable of having a path from the DLP 
LVt^h \ ba .?e wh.ch contains Line Support Processor DLPs . The host number in this case must 
match the field strap that is part of the NSP DLP. 

<dlp 1 i s t > 



< /7\ 

<dlp spec i fi cat ion> 



DLPID 



<dlp id> > 



<dlp spec i f ica t ion> 

ADDRESS <dlp address> - 

> <dlp type mnemonio 1 

SEMANTICS : 

! he n?p P addr " s and DLP id are fi f ld installed straps. The address is used to uniquely specify 
L,7 1" ?■ 8Se : u l t !? also used to resolv * priority if more than one DLP wishes to be 
active at one time, with the higher address winning. The DLP id is used by system software to 
generate unit numbers for the units behind a DLP. 

In the case of the TP-DLP, which supports one train printer, the base physical unit number is 
the unit number of the train printer. The base physical unit number for an HT-DLP is the unit 
number of the lowest numbered disk pack connected to the DLP. The other 15 possible pack units 
are numbered sequentially, incrementing by one. 

<dlp type mnemonio 



— CR1 

— TP1 

— MT1 

— CP1 

— HT1 

— ODT1 

— LSP1 

— NSP1 



SEMANTICS : 



CR1 : 



Card reader DLP is used for card readers B91 15/16/17. 



TP1 : 



750, 1100, 1500 train printer DLP. 

MTI : 

Phase encoded magnetic tape DLP. 

CP1 : 

Card punch DLP. 

HT1 : 

225, 235, 206, 207 pack, host transfer DLP. 

ODT1 : 

Operator display terminal DLP. 

LSP1 : 

Sub-broadband byte or bit oriented line support processor. 

NSP1 : 

Network support processor DLP. 
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Ex amp 1 e 1 : 

Assume the following resources: 



GMM 
A B C D 



B6900 
proc #1 



BASE 2/1/0 


dl 


ps : 






0: 


UNIT 


48, 


ht 


1 : 


UNIT 


48, 


ht 


2: 


3: 


UNIT 


2, 


odt 


4: 


UNIT 


5, 


odt 


5: 


6: 


7 


UNIT 


70 


nsp 



•I 



disk exchange 



di sk disk disk 
48 49 50 



->| odt 2 | 
->T odt 5 ] 
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1 1 


BASE 1/1/0 


dips : 


0: UNIT 71, lsp 


1: UNIT 72, lsp 


2: 


3: UNIT 1, tp 


4: 


5: 


6: 


7: 



datacom lines 
da tacom lines 



LP 1 
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The following symbolic configuration file describes the above system: 
BEGIN GROUP BLUE 



PROCESSORS : 








PROC A; 








MEMORY : 








PRIVATE MODS 32-5S 


I; 






SHAREREAD MODS 60- 


-61 


; 




1/0: 








BASE 2/1/0 








HOST 1 








ADDRESS 





DLPID 48 


HT1 


ADDRESS 


1 


DLPID 48 


HT1 


ADDRESS 


3 


DLPID 2 


0DT1 


ADDRESS 


4 


DLPID 5 


ODT1 


ADDRESS 


7 


DLPID 70 


NSP1 


BASE 1/1/0 








HOST 1 








ADDRESS 


3 


DLPID 1 


TP1; 


DEPENDENT HOST 


4 DLPID 70 


ADDRESS 





DLPID 71 


LSP1 


ADDRESS 


1 


DLPID 72 


LSP1 


PERIPHERALS: 








UNITS 1,2,5,48,49 


,50 


; 




END GROUP; 
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D35 65 CONTROLLER 



"J, MX" RESPONSE 



c™,£5,°™£' to » J ot MX ODT message, "JOB STRUCTURE" will now be displayed, instead 
aJ.RUCTXJRE 

D3647 CONTROLLER - "TD" ACCELERATION 

Throughput of Burroughs TD850 operator display terminals (ODTs) can be 
substantially by decreasing the time for writing a page of information to those ODTs 

The acceleration is accomplished by setting a new TERM attribute. 

Syntax : 

— TERM — FULLPAGE TRUE 1 

- FALSE - 



o f " JOBS 



acce 1 era t ed 



Setting the FULLPAGE option is recommended for TD850 terminals, which will be faster bv a 
factor of 3 to 4 times (approximately). 

The default setting of FULLPAGE is FALSE; terminals are not affected unless the option is 
expl ici t ly set . v 

D3651 CONTROLLER - SUPPRESS FROZEN LIBRARIES 

To avoid congestion in ADM, frozen libraries will no longer be displayed in an ACTIVE mix 
picture. They will be displayed by the A ALL ODT message and the MIX ODT message. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
CONTROLLER 

P3045 CONTROLLER - COMPLETED ENTRIES SHOWS SPURIOUS SUBSYSTEM 

The CONTROLLER now displays the correct heading when an ODT request "ACTIVE IN BLUE" followed 
bv "C" is entered on a B6800 multiprocessor system. Previously, the system would return tne 
correct entries but with the heading "COMPLETED IN BLUE". 

P3046 CONTROLLER - "TERM USER" VS. "AT HOSTNAME" 
The CONTROLLER no longer sends a bad usercode when an ODT on a loosely-coupled system has had 
its "TERM USER" disabled followed by an "AT <host>". 

P3099 CONTROLLER - " SUBSYSTEM= . " VS. QF CORRECTION 

When " SUBSYSTEM= . " is included in an MQ command for a queue that does not yet exist, the 
CONTROLLER wi 11 no longer take a dump. 

P3 236 CONTROLLER - VERY LONG FILE NAMES 
A file name composed of fourteen 17-character names will no longer cause a fault in the 
CONTROLLER. 

P3254 CONTROLLER - "BACKUPQUEUER" CALL 

■n.* PRINTJOB nrocedure was not passing the proper print priority in its call of BACKUPQUEUER. 
The ™l result was thai Uems would be placed later in the print queue than they should have 
leen, but it was possible to cause a LOOP TIMER interrupt. The correct f.eld .s now isolated 
for the BACKUPQUEUER call. 

P3352 CONTROLLER - MULTIPAGE "PER" DISPLAY 

If a PER request was made that would display one more unit than the "umber of 1 ines on the ODT, 
the lasi unit would never be displayed. (NO NEXT PAGE). This paroblem has been corrected. 

P3428 CONTROLLER - MISSING "#" ON ODT FOR SWAPTASK 

Whenever a swaptask was scheduled, because of an HS or because Olayscout was waiting for 

lectors and hen the swaptask started execution, the "#" would be m.ss.ng from the ODT m,x 

d.spUy'even thougn the task actually was running as a swaptask. Th.s problem has been 

correct ed . 
P3516 CONTROLLER - HOUR FIELD IN "TIMEAT" 

The problem of handling more than 2 digits in the TIMEAT define has been corrected. 
P3517 CONTROLLER - "NS" CORRECTION 

The continuation screen no longer overwrites the first 4 characters on an ODT. 
P3659 CONTROLLER - "AA" CORRECTION 

A problem has been corrected where entering "AA" at the ODT would sometimes display the wrong 

informat ion . 

P3750 CONTROLLER - "PA" CORRECTION 
PA now checks for invalid input/output unit types; previously, no checking was done. 
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DOCUMENT CHANGES NOTES (D NOTES) 
CONTROLWARE 



D319I CONTROLWARE - CONTROLWARE VS. FIRMWARE, PACK CONTROLS 
Prior to the Mark 31 system software release, FIRMWARE files were required for the B9380 (disk 

?e?eased P with tL EliiS"" i'!'" P8Ck typCS " 5 a " d 235) controller?. The firmware fHes we e 
released witn the following titles: 

SYSTEM/FIRMWARE/2 1 5 
SYSTEM/FIRMWARE/2 2 5AND2 3 5 

The LH l ODT melsaT aU ° COpied aS SYSTEM/FIRMWARE so that it could be used as the default in 

Listings of the code files were also released with the following titles: 

SYMBOL/FIRMWARE/2 1 5 
SYMBOL/F IRMWARE/2 2 5 AND2 3 5 

The SYMBOL files were printer backup disk files to be used by Field Engineering. 

The B9387 (disk pack types 206 and 207) controller was qualified on the Mark 31 (31.245) system 
software release. The FIRMWARE files described above we\e released on the Mark 31 PR1 release 
together with two additional tapes: B9385CW and B9387CW. The contents of the B9387CW tine It* 
™™<™ Cd ,D GENERAL . n ° te D 3»26 on the Mark 31 and Mark 31 PR1 re eases the conVens^f thl 
B9385CW tape was described in GENERAL note D3180 on the Mark 31 PR1 release. The code fi?es on 

di.k ?n:rh U :d y 7i:!e e r£f ST ^G/: aPeS had tit,CS ™™™«/- s «»• "*' "stings printer b^kup 

^..-V".'-^'^.!^ ^"^ '" ^ "'^ PaCk »""'"» W > ' ' be 

The term CONTROLWARE will be reserved for use in file titles of codefiles required for disk 
pack controllers. The term FIRMWARE will be used in file titles of code files- e t Dala L nk 
Processors (DLP) and Network Support Processors (NSP) . ' 8 " 

loftwairrelease ' ' he Pla "' described be,ow " has been implemented on the Mark 32 system 
Note that B6900 systems require different FIRMWARE files from B6700 and B6800 systems. 
The following table represents the current controller numbers and disk pack types: 
Controller Disk Pack 

B9380 lis 

B9385 • 225,235 

B9387 206,207 

• Note: 

Previous levels of B9385 were released as B9383 and B9384. 

Mark 32 FIRMWARE and CONTROLWARE Naming Conventions 

HH," 8 ™'" 8 . conventions f ° r the code files for B6700 and B6800 disk pack controllers remain the 

cor?™?!., 1 :.!';.. ?•!?■.!.; tm addition - the fi,e for the B9387 < disk pack types 2o6 and 2o7 > 

S YSTEM/F I RMWARE/ 2 6 AND2 7 
Thus the code files for B6700 and B6800 are the following: 

nESKRES&jti *' ° f SYSTEM/FIRMWARE/225AND235) 

S YSTEM/F I RMWARE/ 2 2 5 AND2 3 5 
S YSTEM/F I RMWARE/ 2 6AND2 7 

!K i9^^ FI ^7cw f i„rB a 3i7S^ n , ta p e : d on the Mark 32 systeni tape: they are contai - ed °" 

The naming convention for the B6900 controlware files is the following: 

CO JTROLWARE/BXXXX 

The following files are released on the Mark 32 software release SYSTEM tape: 

CONTROLWARE/B93 8 5 (disk pack types 225 and 235) 
CONTROLWARE/B93 87 (disk pack types 206 and 207) 
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The printer backup disk files on the B9385CW, B9387CW and B9387CWLIST tapes have titles 

CWLISTING/=. 

Mark 33 CONTROLWARE Naming Conventions 

The code files for B6900 controlware files will use the same convention as on the Mark 32 

system software release. 

The titles of the code files for B6700 and B6800 systems will be changed to the following: 

CONTROLWARE/MPX/B9380 (disk pack type 215) 
CONTROLWARE/MPX/B93 85 (disk pack type 225 and 235) 
CONTROLWARE/MPX/B9 3 87 (disk pack type 206 and 207) 

There will be no file equivalent to SYSTEM/FIRMWARE. 

The printer backup disk files on the B9385CW, B9387CW and B9387CWLIST tapes will have titles 
CWLISTING/=. 

The syntax of the LH ODT message and the checking code in SYSTEM/PATCHCONTROLWARE will be 
modified to accommodate these changes. 
D3200 CONTROLWARE - MARK "32" DISK PACK CONTROLWARE FILES 
This note replaces the following notes previously issued: 

D3180 Mark 31 PR1 release 
D3126 Mark 31 release 

rontrolwire files for the Disk Pack Controllers B9380, B9385, and B9387 are maintained and 

qua ? el by he Down ngtown plant. A release tape is forwarded to the Computer Systems Group 

(CSG) plants responsible g for tne host systems. The applicable f.les are cop.ed to the system 
release tapes and qualified. 

Controlware files used by the B6900 Peripheral Test Driver (PTD) are described in the file 
PTD/DOC/MAINT/HT on the PTDTESTS tape which accompanies this release. 

Note: Previous levels of disk pack controller B9385 were released as B9383 and B9384. 

The titles of the files (for the appropriate combination of disk pack controllers and host 
Transfer controls) on the master t"e ?rom the Downingtown plant are changed at each release. 

The current version of the controlware files required for normal large system operat ions are 
copiea (using file naming conventions described in note D3191, Mark 32 release) to the Mark 32 
SYSTEM tape and titled as follows: 

Title on 32 SYSTEM Tape Title on 'CW' Tape ^*l!™l_ P "!l!_T^!! 

SYSTEM/FIRMWARE CONTROLWARE/HSTLME # B6800.B6700 (225,235) 

SYSTEM/FIRMWARE/215 CONTROLWARE/HSTLNE # B6800.B6700 (215) 

iYSTE^/FKXSi/225AND235 CONTROLWARE/HSTLME # B6800.B6700 (223.235) 

SYSTEM/FIRMWARE/206AND207 CONTROLWARE/HSTLPD ## B6800 206,207) 

CONTROLWARE/B9385 CONTROLWARE/HSTLKC # B6900 (225,235) 

CONTROLWARE/B9387 CONTROLWARE/HSTLQD ## B6900 (206,207) 

# Note: B9385CW 
## Note: B9387CW 

» Note: Includes patch T3702-1 which enables binary addressing which is required for this 

conf igurat ion . 
** Note: "Seek timeout" is reported instead of "not ready" when loss of servo phaselock 

occurs . 

Th,. s „„„rt identifier in the file titles of the controlware files on the 'CW' tapes which are 
TequireTfo? normals," tern ojerat ion are composed of the concatenation of the follow... .terns: 
•HSTL' ,'L' , 'V . 

HSTL denotes Host Load file (B6700, B6800 system with Model III Multiplexor or B6900 system) 
L denotes the combination of host controls (HTC1A or HT-DLP) and disk pack controller, 

indicated with a letter. 
V denotes the current version, indicated with a revision letter: A,B,C, etc. 

The current allowable letters for 'L' are denoted in the following table. 

Note: 'Col ID' in the following table denotes the number of hex digits of relevant 
firmware level information. 

. , . .li j «... »»>o section number in the document 
Note: 'Section' in the following table denotes the section 
CWLISTING/A5 615A on the B9385CW and B9387CW tapes. 
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32 


Col 


Disk Pac 


k 


Disk Pack 


Host 






L 


V 


ID 


Control 1 


ers 


Types 


Cont rol 


Sect ion 


Sy s t em 


K 


C 


D2C3 


B9385 




225,235 


HTDLP 


4. 1 


B6900 


M 


E 


D4C5 


B9385 




225,235 


HTC1A 


4.2 


B6700/B6800 


N 


E 


D5C5 


B9383 




215 


HTC1A 


4.3 


B6700/B6800 


P 


D 


D7C4 


B9387 




206,207 


HTC1A 


4.4 


B6800 


Q 


D 


D8C4 


B9387 




206,207 


HTDLP 


4.5 


B6900 


R * 


B 


D9C2 


B9385 




225,235 


HTC1A 




B6700/B6800 



Note: 'Standalone' IVR, contained on the CW tapes, is not required for normal system 
operat ion . *•»*«■ 

Loading Controlware Files 



The 



r^I E f /L ? A ?? R U US6 ^ -° •oad diskpack controlware files on multiplexor and MLIP systems, 
tormat of the command is the following: 

— LH — PK <nnn> MPX <m> PATH <p> > 

|- VIA <port #> <lem #> <dlp #> -| 

>- <filename> FROM <tapename> 1 

Exampl es : 

LH PK 45 MPX 1 PATH 2 CONTROLWARE/B9 3 8 7 FROM BSYSTEM " 
"LH PK 45 VIA 5 CONTROLWARE/B93 8 5 FROM BSYSTEM; " ' 

NOTE: A space is required between PK and <pack #> . 

Contents of 'CW' Tapes 

All the files for normal system operation, diagnostic and maintenance operations for B6000 
series systems are copied to the tapes B9385CW, B9387CW and B9387CWLIST. 

The B9385CW tape contains all the controlware and CWLISTINO files required for the B9385 disk 
pack controller for B6700, B6800 and B6900 systems. »*J»:> aisK 

f^r Rfi8nn C !!„i a £Lnn ntail . 1S a " the controlware f 'les required for the B9387 disk pack controller 
tor iJOBUU and B6900 systems. 

The B9387CWLIST tape contains all the CWLISTING files required for the B9387 disk nack 
controller for B6800 and B6900 systems. P 

The file CWLISTING/A5615A is a printer backup disk file containing the system notes describing 
the changes made to the controlware files since the previous Downingtown release. After 
™££ HI! from tape to disk the file may be printed (103 pages) using SYSTEM/BACKUP with a 
command similar to the following: 

?PB "CWLISTING/A5615A" LP14 

For^each ' CONTROLWARE/ < i dent i f i er> ' file, there is a corresponding "CWLISTING/< ident i f i er> ' 

The CWLISTING/= files are B6000 series printer backup disk files. A single file may be printed 
using the following: •> r 

COPY CWLISTING/<identifier> FROM <tape identifiers END 
?PB "CWLISTING/<identifier>" LP14. 

All the files may be printed using the following: 

COPY CWLISTING/<identifier> FROM <tape identifiers END 
?PB "CWLISTING" LP14. 

Appl i ed Patches 



The following patches have been applied: 

Patch 09221-2 BX383/4/5 Controlware Release 2.2 (Code ME) 

This patch corrects the following problems: 

1. If a Unit Busy R/D was generated during a conditional Subsystem Poll (indicating no units 
are seek ready) and the controller was lock enabled, Controlware erroneously locked the 
controller. 
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2. If a seek timeout status was detected from a drive, Controlware erroneously generated a Not 
Ready R/D instead of a Seek Timeout R/D. 

3 If a restore had to be performed on a drive at unit select or initial seek time, the host 
could accidentally be put into a state which could cause an interface parity error. 

4. If a Conditional Cancel was sent from the host at the same time Controlware was t rying t0 
place the host into R/D mode, the interface would hang Controlware now checks the host 
status after R/D mode and reissues an R/D mode command if Conditional Cancel is present. A 
new R/D TAG 069 has been added to Controlware. 

This patch also sets bit 02 (most significant bit=01) of the buffer memory location 
"PATCH_CODE" so that a Read Memory C/D may be used to determine if the patch is installed. 

Host Load file (HSTLME) patch: 

CC PATCH HSTLME 5496 4 E040 

CC PATCH HSTLME 9484 4 D285 

CC PATCH HSTLME 11672 4 F8B2 

CC PATCH HSTLME 6956 4 6BCB 

CC PATCH HSTLME 16316 4 A12C 

CC PATCH HSTLME 17992 12 F871A0054AE6 

CC PATCH HSTLME 16392 4 F844 

CC PATCH HSTLME 16420 4 F819 

CC PATCH HSTLME 16428 4 4BCE 

CC PATCH HSTLME 18004 20 F84CB8FBF8C966F5C069 

CC PATCH HSTLME 18024 20 6B8E66DBC049F8844A46 

The following files have been updated: 

SYSTEM/FIRMWARE on SYSTEM tape 

SYSTEM/FIRMWARE/225AND23 5 on SYSTEM tape 
CONTROLWARE/HSTLME on B9385CW tape 

Patch 09921-3 B9387 Controlware Release 1.3 (Code PD) 

This patch forces Controlware to generate a Seek Timeout R/D when a "loss of »rvo pb.u 1 ock " 
•status is received from a 207 drive. Controlware previously generated a Not Ready R/D for this 
in. "TnilpaJcn a?so sets bit 09 (least significant bi t=00) of buf er memory oca. ion 
"PATCH_CODE" so that a Ready Memory C/D may be used to determine if the patch is installed. 

Host Load file (HSTLPD) patch: 

CC PATCH HSTLPD 176956 4 0502 

CC PATCH HSTLPD 184072 8 12070BA9 

CC PATCH HSTLPD 189172 20 02AC1C1 1227C1C1 1 3203 

Patch 09921-4 B9387 Controlware Release 1.3 (Code PD) 

This patch corrects the following problems: 

1 If a Unit Busy R/D was generated during a conditional Subsystem Poll (indicating no » n j's 
are seek ready) and the controller was lock enabled, Controlware erroneously locked the 
control ler . 

2. If a Conditional Cancel was sent from the host at the same time Controlware was "^"8 *° 

nlace the host into R/D mode, the interface would hang. Controlware now checks tne nosi 

status after R/D mode and reissues an R/D mode command if Conditional Cancel is present. A 

new R/D TAG 069 has been added to the Controlware. 

This patch also sets bit 10 (least significant bit=00) of buffer memory location "PATCH.CODE" 
so that a Read Memory C/D may be used to determine if the patch is installed. 

Host Load file (HSTLPD) patch: 

CC PATCH HSTLPD 176960 4 0504 

CC PATCH HSTLPD 181800 4 2512 

CC PATCH HSTLPD 188780 12 02D71BAE1000 

CC PATCH HSTLPD 189192 20 04721000268220001000 

CC PATCH HSTLPD 189212 20 03FB1207 174A25O02569 

The following files have been updated: 

SYSTEM/FIRMWARE/206AND207 on SYSTEM tape 
CONTROLWARE/HSTLPD on B9387CW tape 
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This patch corrects the following problems: 

'' It!t^ a I g ^ Sy f te ? S u HT_DLP v Can ^ 0t ha ? dle a state change from State 6 (Command Descriptor) to 
State 4 (Control Message). Controlware no longer attempts that state change. 

2. If a Conditional Cancel was set from the host at the same time Controlware was trying to 
?t!?™« l) £ t , S/A T 5 /D ™° de ' the ' nterf *ce would hang. Controlware now checks the host 
J™ »/n rir o« V u 3nd ^'! SUeS an R/D mode command if Conditional Cancel is present. A 
new R/D TAG 069 has been added to the Controlware. 

Tn'fhH^V^V 6 * 8 b Mr,° 9 °! aSt si « nifi <=ant bit=00) of buffer memory location "PATCH CODE" 
so that a Read Memory C/D may be used to determine if the patch is installed. 

Host Load file (HSTLQD) patch 

CC PATCH HSTLQD 176956 4 0502 

CC PATCH HSTLQD 179848 4 3BA0 

CC PATCH HSTLQD 189136 24 35E3360B28 1 3 1 223020507BE 

CC PATCH HSTLQD 189028 8 12070BA6 

CC PATCH HSTLQD 189160 20 34723CD3037306923248 

CC PATCH HSTLQD 189180 20 240B1207 179425001 569 

The following files have been updated: 



CONTROLWARE/B9 3 87 
CONTROLWARE/HSTLQD 

Directories of the 'CW' Tapes 



on SYSTEM tape 
on B9 3 8 7CW tape 



T^/h'J "^? tab '? s show * he files contained on the 'CW tapes. The entries in the tables are 
sorted by file tit es and do not represent the order in which the files occur on the tapes. An 
in the CR' column denotes an uncrunched file. 



B938 5CW 



LIBRARY TAPE: B9385CW HAS 9 FILES 

FILE TITLE 
•CONTROLWARE/D5X 1 2C , 
*CONTROLWARE/HSTLKC , 
•CONTROLWARE/HSTLME , 
•CONTROLWARE/HSTLRB , 
•CWLISTING/A5615A, 
*CWLISTING/D5X12L, 
*CWLI STING/LI STKC, 
* CWL I ST I NG/L I STME , 
*CWLISTING/LISTRB, 



iS, ■ 


41110 : 


SEGMENTS 


CR 


SEGS CREATED : 


%• 


1000 


05/07/80 


%* 


1000 


05/08/80 


%* 


1000 


06/19/80 


** 


1000 


05/07/80 


% 


4050 


05/07/80 


% 


9930 


05/07/80 


% 


8060 


05/08/80 


% 


8250 


05/07/80 


% 


6820 


05/07/80 
B9387CW 



SECURITY FILEKIND 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 



LIBRARY TAPE: B9387CW HAS 26 FILES, 29050 SEGMENTS 

FILE TITLE CR SEGS 

*CONTROLWARE/D7MBlC, %* 1000 

•CONTROLWARE/D7MB2C, %* 1000 

♦CONTROLWARE/D7MC1C, %* 1000 

•CONTROLWARE/D7MD1C, %* 1000 

•CONTROLWARE/D7MD2C, %* 1000 

•CONTROLWARE/D7MD3C, %* 1000 

•CONTROLWARE/D7MD4C, %« 1000 

•CONTROLWARE/D7MD5C, %* 1000 

•CONTROLWARE/D7MD6C, %* 1000 

♦CONTROLWARE/D7MD7C, %* 1000 

*CONTROLWARE/D7MElC, %* 1000 

♦CONTROLWARE/D7MF1C, %» 1000 

♦CONTROLWARE/D7MF2C, %• 1000 

*CONTROLWARE/D7MF3C, %• 1000 

•CONTROLWARE/D7MF4C, %* 1000 

*CONTROLWARE/D7MF5C, %• 1000 

*CONTROLWARE/D7MF6C, %* 1000 

•CONTROLWARE/D7MF7C, %* 1000 

♦CONTROLWARE/D7MH1C, %* 1000 

•CONTROLWARE/D7MP1C, %* 1000 

♦CONTROLWARE/D7MP2C, %• 1000 

♦CONTROLWARE/D7MP3C, %* 1000 

•CONTROLWARE/D7Y12C, %* 1000 

•CONTROLWARE/HSTLPD, %• 1000 

* CONTROLWARE/HSTLQD , % • 1 

♦CWLISTING/A5615A, % 4050 



CREATED 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/08/80 

05/08/80 

05/07/80 



SECURITY FILEKIND 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC FIRMWARE 
PUBLIC BACKUPDISK 
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LIBRARY TAPE: B9387CWLIST HAS 39 FILES, 190320 SEGMENTS 



FILE TITLE 

•CWLISTING/D7AA2L, 

•CWLISTING/D7AA3L, 

*CWLISTING/D7AA4L, 

•CWLISTING/D7AA5L, 

*CWLI STING/D7AA6L , 

•CWLISTING/D7AB1L, 

♦CWLISTING/D7AB2L, 

•CWLISTING/D7AD1L, 

*CWLISTING/D7AD2L, 

•CWLISTING/D7AD3L, 

•CWLISTING/D7AD4L, 

•CWLI STING/D7AD5L , 

•CWLISTING/D7AD6L, 

•CWLISTING/D7AD7L, 

•CWLISTING/D7AE1L, 

•CWLISTING/D7AF1L, 

*CWLI STING/D7AF2L , 

•CWLISTING/D7AF3L, 

•CWLISTING/D7AF4L, 

•CWLI STING/D7AF5L , 

•CWLISTING/D7AF6L, 

•CWLISTING/D7AF7L, 

•CWLISTING/D7AP0L, 

•CWLISTING/D7AP1L, 

•CWLI STING/D7AP2L , 

•CWLISTING/D7AP3L, 

•CWLISTING/D7AZ1L, 

•CWLISTING/D7AZ2L, 

•CWLISTING/D7AZ3L, 

•CWLI STING/D7AZ4L , 

•CWLISTING/D7AZ5L, 

•CWLISTING/D7MC1L, 

•CWLISTING/D7MH1L, 

•CWLISTING/D7PR1L, 

•CWLISTING/D7QXRL, 

•CWLI STING/D7RXRL , 

•CWLISTING/D7Y12L, 

•CWLI STING/LI STPD, 

•CWLI STING/LI STQD, 

SYSTEM/PATCHCONTROLWARE 



CR SEGS 
% 1260 



% 
% 

% 
% 
% 



% 
% 
% 
% 
<h 
% 
% 

<b 

% 

% 

% 

% 

% 

% 

% 

% 

% 

% 

* 

% 

% 

* 

% 

% 

% 

% 

% 

% 

% 

% 

% 



710 
710 
710 
730 
5770 
290 
4160 
3040 
2250 
2200 
3030 
4720 
3260 
3170 
3640 
2920 
2080 
3390 
2980 
4420 
4050 
2670 
4050 
4390 
370 
930 
870 
860 
870 
1420 
2480 
2950 
3800 
34820 
43030 
10710 
8360 
8250 



CREATED 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/07/80 

05/08/80 



SECURITY FILEKIND 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 
PUBLIC BACKUPDISK 



For a descript 



ion of SYSTEM/PATCHCONTROLWARE, see note D3128, Mark 32 release. 



B6000 SERIES MARK 3 2 RELEASE 05 NOVEMBER 19 80 CONTROLWARE 



B6000 SERIES MARK 32 PAGE 15 ° 

DOCUMENT CHANGES NOTES (D NOTES) 



DATA COMMUNICATIONS 
D3202 DATACOM - "B6900" DATA COMMUNICATIONS 



2rs:: ss'skis bs!..::\b? siavr ■••■ ,h * *«-» ^ K.rs.?»Bj 

The NSP and the LSP are Data Link Processors (DLPs) that communicate with the «i„ 

m:r ara'.B'.S'SK.sr:; STfK."^.^ :s,j:k L' I : !;. L*™ 

contained in "D3203 GENERAL — B6900 Overview" con t igurat ion information is 

General Software Changes 

n.» eW i. Ne i WOrk Def in i {| on . Language, called NDLI I , has been developed for use with this 
l.o d..cr,b t , ,b. log.c.l p.ril.ionin, or d.i/com fu» C |lo„. b"i« n ,J. NSP 1% ,V, 



a 
LSP 



A SOURCENDLII symbolic (available as SYMBOL/SOURCENDLI I on the BSYMBOL tapes Mark 12 
release) has been provided as an example of how NDLII programs ar^r ' In ord 
to provide a B6800-compat ibl e interface to an Mrs ?.»»„s_ mill order 

:;:a:!s , ..n:'-.^.f?!inj- to .nt. SS5rAl!; ■*■ ':"-«■" ;j.~.r;=»?i 




age is data comm 
the files produced 
DCAUDITOR — DCAUDITOR 



The "ID" (Initialize Datacom) ODT message is used to initialize an NSP for DCP1 to 
command!" o the DCCO^TROL^roce iT ?h VaH ? US d « »— — e 1 a t ed'opt ions , ^nd direct 

One of the functions that can be initiated through the ID mess 

S!Jr!ni"?h \ ?•* P r °8 ram > DCAUDITOR, has been written to analyze 

dur ng the auditing process. DCAUDITOR is described in "D3395 DCAUD 
Implementation . 

of dU X Of ID he messaL men,0 TL 0f f fl SPeCi rf fied /2 P Ca ° be "I™**** through the DUMP option 
NSPDUMPANALYZER nrn!;,™ n- Produced by this message can be analyzed with the new 

NipK^ALYllR P mp?em:ntaIion". Pr0gram ' S described in "«>3430 NSPDUMPANALYZER - 

DCWRITE Differences 

Howe'veT* because" of^tne 'SSi'S'*- "" twe * lon ?f B6800 DCWRITEs on the B6900. 
KlTEs ar: Ca m;.em°„ f ted h 5iff:Te„t[y W f^r NsTdft a^omm! "" ^^^ h " d — -or i ent ed 
SET APPLICATION NUMBER (TYPE =38) 

H,,!? 01 " ^m tB COmI?, a PP lica t' on numbers are associated with request sets The NSP 

s.ationTAUor!tSm ent I„°NSp a H t^""' se l , . in «= ! " d " the station's Ed! or and 7" 
station s Algorithm. In NSP data comm, application numbers are associated with 

cau es S a "Change S tlVi^L^"^ 1 ^ ch "«? d - The SET APPLICATION NUMBER "dc^TE 
causes a Change Station Editor" instruction to be issued to the N«!P in 

."NDLII' a'-Set^Irn^rr 8 .^ ?"! Bd APPLICA ™N l.""l.rJS f or " the^t a t ion 
lh P APPTirfxinM Ex ! e 5 nal Variable" instruction will be issued to the NSP to set 
the APPLICATION variable to the application number specified in the DCWRITE 

ANSWER THE PHONE (TYPE = 100) 



TSr ±„f °?f 'aSIoaSswIr^ ^f,^ 1 " H ??' th ^ data C ° mm '""system ** > 1 answer 
FALSE In the laVl^r ^ 'J™ 15 . 01 " »> " notify the main system if AUTOANSWER is 

pS DCwIfe.''^ ." £. 'L ^^r!^ " NSP^a? in" . ine'VoTf ™ E 

:h U e Sy :a.ue Wi {uT0A^WER th ^ PhO ,fl if "" fy? .«"}■"• LiNE^ISCoSNECTACTtON 't™ 
Thn. ?n^» AUTOANSWER or will ignore the ring if LINE. DISCONNECTACTION is NONE 

DCWRITE to „n S NSP °PP° rtunlt y or " eed f ° r the host to send an AN SWER THE PHONE 
ucwkiih to an NSP data comm subsystem. »««««. 

SET/RESET AUTO-ANSWER (TYPE = 102) 

B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 DATA COMMUNICATIONS 
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For NSP data comm, the SET AUTO-ANSWER DCWRITE has the effect, ^^^DCWITE 
variable LINE.DISCONNBCTACTION to AUTOANSWER. The RKSfcl AUiy auto -answer 
causes LINE. DISCONNECT ACT I ON to be se to NONE^ Note J** ^«^ 1 ; «c P subsyst em, 
nn an NSP subsystem causes the ring indication 10 oc ' K •„„ 
?he main system 5 ^ would be notified that the phone was ringing. 

FORCE LINE NOT READY (TYPE =105) 

UPDATE LINE ATTRIBUTES (TYPE =131) 

The UPDATE LINE ATTRIBUTES DCWRITE is not implemented and will cause a DCWRITE 
ERROR on NSP subsystems. 

ATTACH LINE ADAPTER (TYPE = }60) 
DETACH LINE ADAPTER (TYPE = 161) 
ATTACH DCP (TYPE = 164) 
DETACH DCP (TYPE =165) 

INITIATE DCP TEST (TYPE - 168) 

INITIATE CLUSTER TEST (TYPE = 169) 
CANCEL CLUSTER TEST (TYPE =170) 

comm. ™e PTd"." ^maintenance package should be used in its place. 
DCWRITE Results 



counterpart on an NSP subsystem. 



LINE INTERROGATE RESULT (CLASS = 24) 



about the 

On an NSP 

1 ine and , 



nn * DCP subsystem, the LINE INTERROGATE RESULT returns J nf ? rma {j° n 
specified 8 , rl^abou^the station ^urrently re -nced^t.at line 

station specified in the original LINE INTERROGAIfc, ucwkiih. 
ERROR RESULT (CLASS=99), Line/Station Format 

DCP Value NSP Value 



Result Field 

MSG[0]. [47:08] = 

« [39:08] = 

[31:08] = 

[23:24] = 

[47:08] = 

[39:06] = 

[33:01] = 

[32:01] = 

[31:08] = 



MSG[1] 
© 

© 
© 



99 

AC Register 

AI Register 

LSN 

Result Byte Index 

LINE status 

NDL LINE(TOG[l]) 
NDL LINE(TOG[0]) 
Last Flag Set 



[23:24] = Error Flag field 



MSG[2]. [47:08] 
© [39:16] 
MSG[4]. [23:24] 

ERROR RESULT (CLASS= 



Character Register 
Last Sleep Addr . 
Orig. DCWRITE type 



99 





LSN 

Result Byte Index 

LINE status (mapped 

from NSP info) 


First Flag Set 

(from FIRSTERROR) 
Error Flag field 

(from NSP errors) 


3 5 (ENABLE INPUT) 



Result Field 

MSG[0] .[47:08 
© [39:08 
§ [31:08; 

@ [23:24; 

MSG[1] .[47:08 
© [39:08] 

e 

© [30:07] 

MSG[4] .[23:08] 



;99), Switched Status Format 

DCP Value NSP Value 



5, 7, or 99 

AC Register 

AI Register 

LSN 

Result Byte Index 

Termination Reason 

or Toggles 
Switched Status 
Orig. DCWRITE type 



5, 7, or 99 





LSN 

Result Byte Index 

Termination Reason 

or 
Switched Status 
Orig. DCWRITE type 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DATA COMMUNICATIONS 



P2782 DATACOM - "DCRECON" LINE RESULT NOT RETURNED 

If DCRECON sent a MAKELINENOTREADY or BLASTLINE reauest to the DTP ,„j .,„:„„ , .. , . 
was or could be attached to an MCS , the 1 ine relu t me s^gf was sen "back "dcSecON \T 
however, station zero could not be attached because its MCS had been DSed tne |T res 1 
message was lost and not sent to DCRECON. This problem has been corrected 

P2783 DATACOM - EXTENDED LINE TALLYS PROBLEMS 
When using extended line TALLY s , if an "INTERROGATE STATION ENVIRONMENT" fTYPE-41 DTWRITF o,.-» 
in-r^ct^^nlr^o^L^a^'Seen^orrecied: "' ** ^ d ""^» CT^E^S. t^ 

^ief^s L ?ee^oTfeTt: d SO "'^ «-P«>P«'y •>•« extended line TALLYs were used. This 

P2784 DATACOM - " DCSYSTEMTABLES " RETURNS WRONG RESULT 

When options 15 or 6 are specified on a call to DCSYSTEMTABLES, the procedure did not return 
the correct size of the information in words as the document a ion says it alwavs w? I lhf« 
problem has been corrected. i = nvn s.ays n always will. This 

P2795 DATACOM - "READNIF" TEST FOR VALID RECORD INDEX 

Iwn'ii h ?l. NIF if il V? S r ! ad> iS? reCOrd index specified was not tested to determine if it was 
within the allowed bounds. This problem has been corrected. " " was 

P2857 DATACOM - UNLOCK LINE BY "DCIOFINISH" CALLERS 

heen ed I U ^^ IO K INI? ? P re Y| °«" • * „"ad " parameter which would cause it to UNLOCK a line which had 
been LOCKed by its caller. However, s nee sometimes it had to c«lcol.tTtk/ni« «f ?i i- 

cMu^r'Vn- 6 LSN fr ° m r he meS ? a8e paSSed to jt " il *°» ld attempt to SNLOCKtSe wrong oik Tf 
cluster exchange reconfiguration had just changed the DLS of the uttinn If tfc! u£S 
running under DIAGNOSTICS, this could result in a dump by "UNOWNED LIBERATE? !« ™ WC I* 

P2960 DATACOM - " RECALLOB JOBOUTPUT " ON UNINITIALIZED "DCP" 

Occasionally, a dump by INVALID DCCLEAR could occur if DCCLEAR forked off DCRETON t„ „„„. 
object Job^utput returned for a station on a running DCP, but the OT wa o S r» i-J by 
£*??*,„? °" " d i h J .IV^'Li:. Th * Action requested _wil. be g performed 8 by 



the time 
DCTERMIN 

ci renins tances 



DCTERMINATE in that case, so the dump " i . unnec^sa^' I \'*Vl V no logger tLuVnZ?*t> 9 il 



P3229 DATACOM - "DCSYSTEMTABLES" OPTION "5" "SEG ARRAY" FAULT 
The length of the information to be returned bv a DCSYSTPMTART ec <-»•%♦;«« « . . ■ 



"? ° r orrect,y - u 'I tfte "CP B «ro name was an exact multiple of 6 characters a SEG ARI 
fault could occur. The length is now computed properly and th.arrSy resized when 'neces^a^ 

P3677 DATACOM - "DLS" CORRUPTED IN FULL DUPLEX DISCARDS 

ArV^rUAi" s iJ uat |? ns involving full-duplex lines, the MCP might get an INVALID INDEX in 
DCCONTROL attempting to use the DLS extracted from a d i scarded ful 1-duol ex m s m ,n r! Th? 
?o d??e a rH S H ""*!!" DCm0flE ?'" corrupting the DLS field X changed the message diss 
used * err ° r W ° Uld P robab 'y 8° unnoticed unless main memory 8 DCP tables wfre being 

«o:. , fJ'«f.552S l lTi. t *^: t i? B T«S. rt w2r f e t S:eS lS fiBld ° f ^ aUXUiary Hne UpUt "•»•• was 
Both these problems have been corrected. 
P3771 DATACOM - "DCFILELOCK" DEADLOCK 

i.rm^ry^a^crtabfes^s'L^n^orrfcter *"* ^ °» tSt *« di "* •*••* job outputs and 
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DCALGOL 



D3075 DCALGOL - QUEUES AS LIBRARY PARAMETERS 

Queues are now allowed as parameters to library procedures in DCALGOL. 
D3357 DCALGOL - REMOVE "PORT" AND "SIGNAL" 

PORTS and SIGNALS have been ^T^'^™ ^^e'cons true? seclude' ?ne follow^! PORT 
SIGNALS are no longer recognized by the compi 1 er declarations? PORT and SIGNAL attribute 
and SIGNAL declarations, PORT and SIGNAL ARRAY geclara ions y „,,„„, SIGNAL statements 
assignment and reference . and O^ »» d s «jO|| s ^ N | E ^EIVEMESSAGE, RECEIVERESPONSE and CLEAR, 
are no longer recognized: SENDMESSAGb, ^""»J""» h t been deimpl emented. ) Also, the 
(Note that CLEAR(<diskheader ident |''">;<V; p> Ji " 8 w j " the port and signal parameters to 
HOSTINFOFUNCTION function has been deimplement;ea, aiong h 

the SIZE function. 
1)3444 DCALGOL - QINSERTEVENT DOCUMENTATION 
On page 3-26 of the B67O0/B770O DCALGOL Reference Manual (Form No. 5000052) the .«««..{ J. 

t£ !:#..:«!? iFEH.:; s.5f^" f V 1 ° : : ? - itfc " !t has happened ' the system 

w°ll not enforce the READ-ONLY nature of this attribute. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DCALGOL INTRINSICS 



D3629 DCALGOLINT - "DCALGOL I NTRN" SUBSUMED BY "GENERALSUPPORT" 

fi™ii«npSA»x ^k Mark J 32 ' e ' e ? Se ' the DCALGOL intrinsics have been subsumed by the 
GENERALSUPPORT library, described in GENERAL note D3354. «=>umcu oy me 
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DOCUMENT CHANGES NOTES (D NOTES) 
DCAUDITOR 

D3395 DCAUDITOR - "DCAUDITOR" IMPLEMENTATION 
SYSTEM/DCAUDITOR is a program which performs analysis of an audit Jjje P-duce d^by^t he^OO 
Datacom subsystem procedures of the MCP. The items wn^cn a ey message ). If any 
the ID/DC ODT input ^ssage ("e GENERAL note D3. 56 fo he enna c ^ ^^ ^ . { 

aud t options are specified, at least one auan iiic w f ... oroduce an audit file with 

"NSPAUDIT/DCCONTROL/<NSP-uni tid>" . 

SYSTEM/DCAUDITOR has several modes of operation. 

The mode of operation is controlled by the parameter string which is passed to SYSTEM/DCAUDITOR 

<„„rHfu$^ «. - *• «-^-- 

The string parameter <string> can have the following values: 

DCCONTROL The entire audi, file produced by the MCP procedure DCCONTROL will be 

analyzed. 
DCCONTROL <n„n> Only the last <nnn> records of the audit file produced by DCCONTROL will 

analyzed. 
DCINITIAL The entire audit file produced by the MCP procedure DCINITIAL will 

analyzed. 
DCINITIAL <nnn> The last <nnn> records of the audit file produced by DCINITIAL will be 

analyzed . 
SYSTEM/DCAUDITOR will -rrently^erfo^ detailed analysis for NSP ^rmat t ed^regues t s^and 
reacts andTe^its^For DCP .HTSlS formated reoues t s and resul t s , the entire message 
will be printed in hex. 

K3i-M.vi^:ri: s:-:a« sjirs-SKKSTj^ SK'iSfc-ttS:;..-" ,h " ,h ' 

D3637 DCAUDITOR - ADD ADDITIONAL INFORMATION TO 'DCAUDIT" FILE 

Timestamp information, as well as environmental information h »* be f e " w ^ roduc ed aCh aUdU 
entry. DCAUDITOR will now print the environment in which the audit file was produced. 



be 
be 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DCP PROGRAM GENERATOR 



P2 802 DCPPROGEN - ALLOW "TERMINATE NORMAL" 

A TERMINATE NORMAL statement may now be used in a message request set. The TERMINATE NORMAL 
statement in an output request set is equivalent to a TERMINATE OUTPUT statement. A TERMINATE 
NORMAL statement in an input request set is equivalent to a TERMINATE INPUT. 

P3497 DCPPROGEN - GARBLED "BAUDOT" TRANSLATE TABLES 

Since Mark 27, DCPPROGEN has attempted to merge translate tables and string pools into one 
memory area. If one of the terminals for a DCP specified CODE=BAUDOT and user-specified 
JU£S-!. a J; e tables were also declared, the string pool would be incorrectly merged over the 
DCPPROGEN- supplied BAUDOT translation table. Since Mark 30, the NDL compiler always supplies a 
user" translate table for internal use; since that time, CODE=BAUD0T has not generated a 
proper translate table even without user-declared translate tables. These problems have been 
corrected. 

A related problem since Mark 31 (in which use of CODE=BAUD0T on a DCP with local memory could 
cause multiple LABEL errors in DCPPROGEN) has also been corrected. 

P3 666 DCPPROGEN - CONSECUTIVE LINE TALLY USAGE 

If consecutive extended line TALLYs were referenced in an NDL program, DCPPROGEN could generate 
code that was off by one word in accessing them. This problem has been corrected. 

P3677 DCPPROGEN - "DLS" CORRUPTED IN FULL DUPLEX DISCARDS 

i^v™ .,'" situations involving full-duplex lines, the MCP might get an INVALID INDEX , 
DCCONTROL attempting to use the DLS extracted from a discarded full-duplex message space Th 
problem arose because DCPPROGEN was corrupting the DLS field when it changed the message clas 
to discarded. The error would probably go unnoticed unless main memory DCP tables were bein 
used. 

In a related problem, the station part of the DLS field of an auxiliary line input message was 
wrong if extended line TALLYs or TOGs were used. 

Both these problems have been corrected. 

P3775 DCPPROGEN - "INCREMENT TRAN" STATEMENT 

The INCREMENT TRAN statement for Message-Oriented lines was not writing the incremented 
transmission number back into the station table. This problem has been corrected,. 



i n 
e 
s 
g 
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DCSTATUS 



P3012 DCSTATUS - PRINT STATION TABLE BASE CORRECTLY 
Message-Oriented Dataccn station table base words are now interpreted and printed correctly. 
Also, the NETWORK option has been altered to correctly report adapter types present on 
message-oriented lines. 
P35 39 DCSTATUS - " 17-CHARACTER" NAMES FOR GRAPH OUrPUT 
DCSTATUS GRAPH option now prints out the firs, 17 characters of line and station identifiers 
instead of only the first 9. 
P3572 DCSTATUS - PREVENT "NIF/DCPCODE" FILE CHANGES 
DCSTATUS no longer, under certain conditions, changes global datacom file titles to titles with 
a usercode. 
P3600 DCSTATUS - CALCULATE STATION TABLE BASE SIZE 
,. some instances. DCSTATUS was printing out station tables incorrectly for stations after the 
first station on a line. This no longer occurs. 
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DIAGNOSTIC MCS 



D3 344 DIAGNOSTMCS - INPUT SOURCES 



nf* 4 ? f/ h K DIAGNOST JCMCS Reference Manual (Form No. 5001514) states that input fr 
to work properl* 00 "^ t,me '* 1$ present if CD0NLY j s SET. CDONLY must be RES 



proper I y 
D3427 DIAGNOSTMCS 



om a card 
RESET for this 



NONNUMERIC DIAL CHARACTERS 



The DIAL command now 

characters. However, this additional information has 



!? S^I- be ?' de * digits, various time delays and dialing option 
RAonn mcd n . ■; additional information has meaning only for DCP Message-Oriented and 
B6900 NSP Datacom; it cannot be used with Auto Call Units (ACUs) for DCP Datacom yjI,enlea an " 

Revised Syntax: 



— DIAL — <station id> — <dial sequence> — 



<dial sequence) 
< 

-<digi t> 



- # 

_ w 

- DO 

- Dl 

- D2 

- D3 

_ D4 

- D5 

- D6 

_ D7 

_ D8 

_ D9 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DIAGNOSTIC MCS 

P3163 DIAGNOSTMCS - ERROR IN "BTB" ATTACH BY "LSN/DLS" 

,. running the BacK-to-Bac, tests if an attempt « w.r. s Z?Jn\? i lt£*\™>l 'mC ^"dIAGNOS^ ICMCS 
DLS rather than by name, and 1 t tnis were tne which was caused by scanning an 

STittf:?!U3 , S.ti«"Sii. P "»;: ?«"«• Torre^^ne problem did .o. occur if the regu.ar 
ATTACH command were used. 
P3253 DIAGNOSTMCS - ERROR IN "BTB ALL REPEAT <STRING>" 
In DIAGNOSTICMCS back-to-back testing one form of the BTB REPEAT command allows tb.^j.r ^o 

'""IfLd'as ^"father than'as'a'p i 'number Ine^ctffed string was not being used; 
tl^teld! alleiu^a.ent number of Nlfl/charact ers were generated. Th.s no longer occurs. 

P3601 DIAGNOSTMCS - ALTER CORRECT STATION ADDRESS 
DIAGNOSTIQ-CS was altering the address character of the last station referenced, rather than 
"he designated station. This problem has been corrected. 

P3602 DIAGNOSTMCS - PREVENT DUMP ON " <DCL> " 
Entering a "<DCL>- with DCP#, cluster # or line # too far out of range could cause program 
dumps. This problem has been corrected. 

P3603 DIAGNOSTMCS - ATTACHED "CA" OPTION 

, . a »!.. ™ „„.)„„ in station attaches. SYSTEM/DIAGNOSTICMCS did 
EfiErSfrSSTO^S: to'pTrV^ifop^on" 'TnU'opt " oV \ . now allowed. 
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D3I08 DMS 1 1 - NEW DATA BASE STACK STRUCTURE 

TL SU ??rP«»nr a il?^« CC ^ SSROU I INES ' '^ e data base stack structure has been modified. As a result, 
the ACCESSROUTINES have been made an executable code file which is run automatically at the 

a'shared e iibr r* In ma " y respects - the new ACCESSROUTINES act in much the same way as 

Operational Differences 

For the most part, operation of new data bases should be identical with previous data bases 
T„H„ pr, ! B "J3! d,fference ,s arise strictly from the fact that the ACCESSROUTINES are now executable 
code and that compiled-in values for task attributes like PRIORITY and CORE and others will be 
mean 1 ng t u 1 . 

When the first user of a data base opens the data base, the ACCESSROUTINES will be run 
automatically. The ACCESSROUTINES wl I remain scheduled if the resources requ red are not 
available. Proper choice of a compiled-in CORE estimate may be desirable if the compiler 
estimate of the data base core requirements are inaccurate. If it is desirable that a 

AC^RSsSAutinfs'^h 8 '„ "" bB A e "^i be sched » 1 ^, it may be advisable to mark the 
AlX-bAiKOUTINES code file as a Control Program. 

Communication with new data bases continues to be available by use of the SM ODT message. In 
addition, the AX ODT message may be used interchangeably with the SM ODT message. 

If the data base stack is manual lyDSed by the operator, the data base stack will terminate 
FamH Cr,,lcal B,ock Ex,t and a11 users of the data base will be DSed for a Death in the 

Recompi lat ion of User Programs 

As a result of MCP changes required to implement new ACCESSROUTINES, user programs compiled on 
28 or earlier releases cannot be used against new ACCESSROUTINES. These programs should be 
a e 32 m MCP ° r earller user P r °8 rams "'X «till be used against 31 or earlier data bases on 

Generating the ACCESSROUTINES 

™a. A £? ESSR0U ?I NES may ° nly be con'Pi'ed using the 32 level DMALGOL compiler. The 32 level 
DMALGOL compiler may not be used to compile ACCESSROUTINES for 31 or earlier data bases 
Attempting to use a 3 1 or earlier ACCESSROUTINES generated with a 32 DMALGOL compiler wili 
result in a DMOPENERROR 36. Using a 31 or ear 1 i er DMALGOL compiler on a 32 level ACCESSROUTINES 

RECOVERY i t ', n T ta * e " ors -. G<=n"at ion of the rest of the tailored software , Stilt^, 
RECOVERY, etc., does not require a 32 level DMALGOL compiler. 

New Stack Structure 



New ACCESSROUTINES have true segment dictionaries separate from the data base stack itself A 
programdump that has DBS set will dump the data base stack but not the segment dictionary 
associated with the data base. This will be true even if CODE is requested in the dump. 

Outer block declarations of the ACCESSROUTINES will now be at lex level 2 rather than at lex 
level 1 as before. All other environments have moved to higher lex levels Entrv noint 
procedures to the ACCESSROUTINES now run at lex level 5. entry point 

The order of structure environments, now at lex level 3, have been reversed in the data base 
n^r th k r comp ' led structure environment will be the first lex level 3 environment found 
near tne base ot the data base stack. 

D3170 DMSII - SHARED "ACCESSROUTINES," DATA BASE EQUATION 

Because Mark 32 system software produces re-entrant ACCESSROUTINES code files (described in DMS 
", note uj ' U8 '' two or . m ?!' e data bases may simultaneously use one set of ACCESSROUTINES This 
no e describes new capabilities and procedures for the 'crea t i on , use, and maintanence of 
multiple da a bases that share one ACCESSROUTINES codefile. To take advantage of these new 
features data base user programs must be compiled using Mark 32 level compilers. However 
installations choosing not to use the features described here may continue to use DMSII data 
bases on Mark 32 DMSII software without re-compiling user programs or altering operational 

P^ vvCUUl 6S ■ 

Conversion of ACCESSROUTINES code files to re-entrant format can provide significant reductions 
in memory requirements when more than one data base is active and enhances an installation's 
ability to manage data bases and user program libraries. For example, test and production data 
bases using a single ACCESSROUTINES code file may both be acUve at the same time but use 
separate audit and data files. Alternatively, a largedata base could be divide!! into smaller 
data bases to permit their independent management, reduce recovery costs following system 
failures, or more efficiently use secondary storage devices. ' system 
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p,;„r ,„ ih f Mark 32 release multiple code files had to be produced for user programs that 
Pr.or to he Mark "release muit P programs were otherwise identical. The data base 

task via its FAMILY attribute. 

Th d s ma!n t a^„ c : be of ch 5a!r 0"*^ ti:r * ifcr e So^s«^fta . "^r" ..2:«.. b "n-«i r :;ii^ 

.Spo™..."." ...J equation?^ usercode and security considerations that may restrict a 
program's ability to open particular data bases. 

DATA BASE OPEN ALGORITHM yf 

When a program executes a host language OPEN statement, an MCP procedure is called to service 
.!! ?,£..?!» Thf MCP first determines if the requested data base is currently active. If so 

h^ ntrnnirJ is ^attached" o The data base and allowed to proceed. When the requested 
data ba e P s'noT active ^formation aoout the data base must be located and appropr . at e memory 
tVrU\l es on tructed efore the MCP can permi t the user P-^am^cont^ue. g The^nform ti 

IlErith. used oy hi MCP to find thT ACCESSROUTINES code file has been altered on the Mark 32 
release To permit data base equation and sharing of ACCESS ROUTINES by multiple data bases. 

v r i nr tn Mark 32 a user nroaram requesting an inactive data base called SALES, for example, 
Prior to Mark 32 a user P r °8** m l^r a file called ACCESSROUTINES/SALES to obtain information 
would cause the MCP *o look tor a t lie cauea V . , . h program's FAMILY task 
describing the d » ***** s ' a °£ er TLTsJ em o?rec\ory °r the ulerc.de directory under which the 
program^as'execuHng' 'Tht^atgorith^w H continue'to be used for Mark 31 and earlier data 
bases and user programs running on a Mark 32 MCP. 

JSIHSSSmIIJII .JS.flll i, then «*d to .o.,tr»ct .h, d.t. b..« ,t..k b.forc the „.«r prog.am 

is allowed to proceed. 

D.t, b.x eq..tlon c.n b. n.«d to .U.r th. TITLE .tt.lb.t. of. d.t. b... '"^"J,,.};, «*; 

:Ki:a:'r- ia:r.i-'.. , ir...! , .. i w..f:: :j. n s:.re.. n?.TH , ?.t::"ai;.K ".::» .r 

a data base TITLE is described in the section on data base equation. 

DATABASES SHARING ACCESSROUTINES 



and 
es to 



This section describes operation procedures and new DASDL ^ " » ax f or t h e c r ea t i on , use 

maintanence of multiple data bases that share a single ACCESSROUTINES code tile. cnang 
DASDL syntax are summarized at the end of this section. 

Dynamic Parameters 

Although data bases sharing an ACCESSROUTINES code file are phy s i cal 1 y i ndependent , they must 
descHbe identtca oata blse structures including data sets remaps, index set s and •««••. 
Furthermore corresponding data sets in each data base must describe identical data items and 
have identical record formats. 

However, such data bases may differ in a number of characteristics. These characteristics, 
called Dynamic Paramters, include: 

- ACCESSROUTINES code file title 

- Data base and logical data base guardfile titles 

- Audit trail attributes 

- Control file attributes 

- AREAS, KIND, family name, and buffer specifications ot data 

sets and index sets 

- REBLOCKFACTOR of data sets 

- ALLOWEDCORE 

- CONTROLPOINT and SYNCPOINT frequencies 

a:s , s:!:r':;: , :::..:.::- , .;i.' , !!/"».:i!'^.i:"" , J'!:"i""i» J s:..tr« , : to , i:;. 

management software. 
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The process of describing and creating data bases that share ACCESSROUTINES is called modeling 
and is similar to conventional DASDL update of a single data base. The primary differences 
between modeling and conventional update are (1) update level does not change, (2) only dynamic 
parameters may be altered, (3) reorganization clauses are not allowed, and (4) the 
ACCESSROUTINES need not be re-compiled. 

To model a data base after an existing data base, the DASDL compiler is provided with a 
description file and a DASDL description of a data base containing a <model option> The 
compiler ensures that the description file and the DASDL source differ only in settings of 
dynamic parameters. If no errors are found, a new description file is created with the same 
update level as the original description file. The new description file can then be used to 
5~°J2R_L 1 JL_i.5i' ored data base software and to initialize the control and data files of the new 
data T>ase. ~~ " — — 

The syntax of the <model option> is 

— MODEL <databa.se name> 1 



A 



When a <model option> is present, <database name> is used to form the title of the original 
description file. The name of the new description file is obtained from the code file name in 
the compile statement that invoked DASDL. When used, a <model option> is placed at the 
beginning of the DASDL source input. If a <model option> is present and the ZIP dollar option 
is set, the DASDL compiler zips compilation of all data base software except the 

A^t_*li3 sK-UU 1 1 JNCiS . 

A <update option> of the form 
UPDATE; 

may appear following a <model option>. When present, it indicates that the data files and 
control file already exist for the data base. UPDATE causes SYSTEM/DMCONTROL to be run to 
update the control file of the existing data base. If the <update option> is omitted the 
SYSTEM/DMCONTROL run will initialize the control file of a new data base. If the DMCONTROL 
dollar option is reset, SYSTEM/DMCONTROL wi 1 1 not be run even if an <update option> is 
spec i f i ed . 

The example below shows the creation of a test data base, TESTDB, from a production data base 
called LIVEDB. The production data files reside on DISK, and the data base writes a duplicated 
audit to tape. The test data base exists on TESTPACK where it writes a non-duplicated audit 
The DASDL source used to create LIVEDB was 

OPTIONS (AUDIT) ; 

D DATA SET (K NUMBER(6)) AREAS = 100: 

S SET OF D KEY K; 

RDS RESTART DATA SET (RINFO ALPHA(IOO)); 

AUDIT TRAIL (KIND = TAPE, DUPLICATED ON TAPE); 

7™,J^ ll0willg WFL j0b creates TESTDB from the description file of the production data base 
Lr I VEDB 

? BEGIN JOB CREATE/TESTDB; 

COMPILE TESTDB WITH DASDL- 

COMPILER DATA 

MODEL LIVEDB; 

OPTIONS (AUDIT) ; 

CONTROL FILE (PACK = TESTPACK) • 

D DATA SET (K NUMBER(6)) PACK = TESTPACK- 

S SET OF D KEY K PACK = TESTPACK 

RDS RESTART DATA SET (RINFO ALPHA(IOO)); 

AUDIT TRAIL (PACK = TESTPACK); 

?END JOB. 

This DASDL compilation produces the file DESCRIPTION/TESTDB from the description file of the 
production data base, DESCRIPTION/LIVEDB. The update levels of both description files are 
equal. Because the ZIP dollar option was not explicitly reset, DASDL zipped the compilation of 
all tailored software for TESTDB except the ACCESSROUTINES. SYSTEM/DMCONTROL was run to 
initialize TESTDB' s control file. 

A user program compiled using DESCRIPTION/LIVEDB could open the production data base LIVEDB or 
the test data base TESTDB using data base equation. 

User dollar options may be used to combine different sets of dynamic parameters into one DASDL 
source . 

ACCESSROUTINES Title 
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Because data bases with different <database ««e>. may «| «»»«•«« se j„°£ tnf fmTTf -toJeS 
A^rp«!<!RnimrNFS code file title may be specified in the DASDL source. mis iiie 1 1 i ■ c i» ° l " 
to c" ro? file Ind used to find the appropriate ACCESSROUTINES code file dur.ng the data 
base open process. The syntax of an <accessrout ines spec i f icat ion> is 

— AccE ssRPi rnr"" 1 = s f i ' * lluju 1 

where <fTT B title> is a file name optionally including a <usercode> and ON <family name> P*^- 
If the ZIP dollar option is set and a <model option> was not present, DASDL wi 1 1 zip the 
compilation of the ACCESSROUTINES code file as <file title>. 

The ability -explicitly name ACCESSROUTINES code /IJ-^^S^ilSiS/jS.J:;:..':!-.:' 1 '^b..' I^ 
dTa'base'may noT use^A^ROUTINErcooT f I 1. stored -der a different usercode or on a 

ACCESSRS V TlNES n cou,rbrIIored i tn b !ts t fii .Mtf. permit ^s^^denl i ^ca ?o^ and^ a° g eUnt 
ACCLSSKUUl llNiis couia oe siuicu in » .-,! ,«, j... hase ooen alsorithm determines 

w Lth^f^!^^a? d ?i[: , fra„ R ACCESSROUTINES , co^n!ie the 

specmcattonT if omitleS? ?he ACCESSROUTINES title is taken from the original description 

file. 

Control File Usercode 



The DASDL svntax for <control file> has been extended to permit spec i fi cat ion of 
the data base con ?ol file. The control file and all data and audit files will 
!t?.!i!,5«3«. SvSTEM/DMCONTROL must be run under this usercode or a pr. v. ledge 



fication of a usercode for 
be stored under 
ihls'usercode. SYSTEM/DMCONTROL musf — - — «"•""■ ti... ..sercoae or a p, .v.. cased usercode to 
initialize or update a control file. 



Update 

Dynamic data base parameters may be changed during a conventional DASDL update as well as under 

the <model option>. 

Data bases that share the same ACCESSROUTINES must be compatible. The following update 

ACCESSROUTINES) and update the control files of their respective data bases. 

The following diagram illustrates the update process for two data bases that share one 

ArrFSSROirriNES code file. Description and control files are shown tor data oases i-iyei/d »uu 

t^TOB ^update levels n and n+1 . TESTDB was created by model ing LIVEDB and did not exist 
prior to update level n. 
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file 
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LIVEDB was chosen as the original data base and updated first. LIVEDB's updated description 
file was then used to model an n+1 level description file for TESTDB. A SYSTEM/DMCONTROL 
update operation brought TESTDB's control file forward. At level n+1, both data bases use the 
ACCESSROUTINES code file created from LIVEDB's n+1 level description file. In practice either 
LIVEDB or TESTDB could have been selected as the original data base in the update process. 

There is no requirement that all data bases must be updated at the same time. For example the 
! 1 ? d ,™i' lg , of TESTDB from level n to n+1 could be performed at any time following the updating of 
LIVEDB. However, until updated to level n+1, TESTDB must continue to use the ACCESSROUTINES 
compiled using LIVEDB'S level n description file. The ACCESSROUTINES TITLE option in DASDL can 
be used to give unique names to each ACCESSROUTINES code file. 

The following WFL job would update both TESTDB and LIVEDB adding the new dataset Q: 

?BEGIN JOB UPDATE/BOTHDBS ; 

% 

% UPDATE LIVEDB 

% 

COMPILE LIVEDB WITH DASDL: 

COMPILER DATA 

UPDATE; 

OPTIONS (AUDIT) ; 

D DATA SET (K NUMBER(6)) AREAS =100; 

S SET OF D KEY K; 

RDS RESTART DATA SET (RINFO ALPHA(IOO)); 

Q DATA SET (Z ALPHA(12)); 

AUDIT TRAIL (KIND=TAPE, DUPLICATED ON TAPE) • 

■}% END LIVEDB DASDL 

% 

% UPDATE TESTDB 

% 

COMPILE TESTDB WITH DASDL; 

COMPILER DATA 

MODEL LIVEDB; 

UPDATE; 

OPTIONS (AUDIT) ; 

CONTROL FILE (PACK = TESTPACK) • 

D DATA SET (K NUMBER(6)) PACK = TESTPACK; 

S SET OF D KEY K PACK = TESTPACK; 

RDS RESTART DATA SET (RINFO ALPHA(IOO)); 

Q DATA SET (Z ALPHA(12)) PACK = TESTPACK; 

AUDIT TRAIL (PACK = TESTPACK); 

?% EN D TESTDB DASDL 

% 

?END JOB. 

Reorganizat ion 
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Reorganization of modeled data bases proceeds in much the same manner as a DASDL update. The 
following diagram and WFL job illustrate the reorganization process for LIVEDB and TESTDB 
caused by increasing the length of Z in dataset Q from 12 to 20 characters: 



L 
I 
V 
E 
D 
B 



Descr ipt ion 

file 
update level 

n+1 



-> I DASDL update 



CF n+1 



data 
files 



REORGANIZATION 
upda t e 



Descr ipt ion 

file 
update level 

n + 2 



->| CF n+2 



-> data 

I files 



DASDL 
mode II update | 



DASDL J 
model update | 



T 

E 
S 
T 
D 
B 



Descr ipt ion 

file 
update level 

n+1 



| CF n+1 |- 



data 
files 



REORGANIZATION 
upda t e 



Descr ipt i on 

file 
update level 

n+2 



->| CF n+2 | 



data 
files 
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7BE0IN JOB REORGANIZE/BOTHDBS; 



« REORGANIZE LIVEDB 

% 

COMPILE LIVEDB WITH DASDL; 

COMPILER DATA 

UPDATE; 

OPTIONS (AUDIT) ; 

D DATA SET (K NUMBER(6)) AREAS = 100; 

S SET OF D KEY K; 

RDS RESTART DATA SET (RINFO ALPHA(IOO)); 

Q DATA SET REORGANIZE( ITEMS CHANGED) (Z ALPHA(20)); 

AUDIT TRAIL (KIND = TAPE, DUPLICATED ON TAPE); 

?% END LIVEDB DASDL 

% 

RUN SYSTEM/BUILDREORG; 

FILE DASDL (TITLE = DESCRIPTION/LIVEDB) ; 

DATA CARD 

$ NOZIP 

UPDATE; 

?% END BUILDREORG INPUT 

% 

COMPILE REORGANIZATION/LIVEDB WITH DMALGOL LIBRARY; 

COMPILER FILE CARD (KIND = DISK, TITLE = DATABASE/REORGSYMBOLIC)- 

COMPILER FILE DASDL (TITLE = DESCRIPTION/REORGANIZATION/LIVEDB) ; 

RUN REORGANIZATION/LIVEDB( "GENERATE" ) ; 

% 

RUN REORGAN I ZAT I ON/L I VEDB ( " REMOVE " ) ; 

* 

% REORGANIZE TESTDB 

% 

COMPILE TESTDB WITH DASDL; 

COMPILER DATA 

MODEL LIVEDB; 

UPDATE; 

OPTIONS (AUDIT); 

CONTROL FILE (PACK = TESTPACK) ; 

D DATA SET (K NUMBER(6)) PACK = TESTPACK; 

S SET OF D KEY K PACK = TESTPACK; 

RDS RESTART DATA SET (RINFO ALPHA(IOO)); 

Q DATA SET (Z ALPHA (20)) PACK = TESTPACK; 

?% END TESTDB DASDL 

% 

RUN SYSTEM/BUILDREORG; 

FILE DASDL (TITLE = DESCRIPTION/TESTDB) ; 

DATA CARD 

S NOZIP 

UPDATE; 

■>% END BUILDREORG INPUT 

% 

COMPILE REORGANIZATION/TESTDB WITH DMALGOL LIBRARY; 

COMPILER FILE CARD (KIND = DISK, TITLE = DATABASE/REORGSYMBOLIC); 

COMPILER FILE DASDL (TITLE = DESCRIPTION/REORGANIZATION/TESTDB) ; 

% 

RUN REORGANIZATION/TESTDB( "GENERATE" ) ; 

% 

RUN REORGAN I ZAT I ON/TESTDB ( " REMOVE " ) ; 

* 

?END JOB. 

Note that the DASDL source used to create TESTDB's level n+2 description file has no REORGANIZE 
clause for dataset Q. The reorganization information from LIVEDB' s n+2 description file was 
copied into TESTDB's n+2 description file by the DASDL compiler during the modeling operation. 
When a <model option> is present, DASDL will generate a syntax error for any reorganization 
cards found in the DASDL source. 

Recovery 



For the most part, all forms of recovery will continue to operate as before. However, the 
values of dynamic parameters stored in the control file will not be changed by rollbacks or 
rebuilds. At the completion of a rollback or rebuild, dynamic parameter settings will be the 
same as those at the beginning of the operation. 

Other DMSII Software 



The operation of the remaining DMSII software has not been changed to support shared 
ACCESSROUTINES and data base equation. For example, RECOVERY/LI VEDB can be used to recover 
LIVEDB but not TESTDB. TESTDB can be recovered by RECOVERY/TESTDB but not by RECOVERY/LI VEDB. 
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New DASDL Syntax 



The DASDL syntax diagram for <database> is extended as follows to support the data bases that 
share ACCESSROUTINES (page 4-1, DMSII DASDL Reference Manual, form no. 5001480): 

<da t abase> 



-<mode I opt ion>- 



-<update option> — 



-/l\->defaul ts> 

-/;l\-<initialize>- 

-/l\-<opt ions> 

-/l\-<parame t ers>- 

-/l\-<accessrout ines speci ficat i on>- 



-/l\-<audit trail> 

-/l\-<cont rol file> 

-<data set> 

-<global item> 

-<physical spec i fi cat i ons>- 

-<set-subset-access> 

-<logical data base> 

-<remap> 



The new DASDL syntax for <model option> is: 
<mode 1 opt i on> 
— MODEL <database name> 



The new DASDL syntax for <access rout i nes spec i fi cat ion> is: 
<access rout ines speci ficat ion> 
— ACCESSROUTINES = — <file title> 



The DASDL syntax for <control file> has been modified to allow specification of a usercode for 
the data base control file (page 4-32, DMSII DASDL Reference Manual, form no. 5001480): 

<cont rol f i 1 e> 

— CONTROL FILE ( <control file attributes> ) 1 

I I 

— ATTRIBUTES — 

<control file attributes> 

< . 

/ 1 \ — <d i sk/pack> I 

/1\ — <usercode speci ficat ion> 

<di sk/pack> 

DISK 

I— KIND = —I 

— DISKPACK 

I — PACK | | — = < family name> 

B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 DMS II - GENERAL 



B6000 SERIES MARK 32 



PAGE 168 



— /1\— KIND 



DISKPACK — 

I— PACK 

-/l\— PACKNAME = < family name> 
<usercode spec f i ca t i on> 
— USERCODE = <usercode> 



DATA BASE EQUATION 

To take advantage of re-entrant ACCESSROUTINES , the title of a data base must be specifiable at 
run time. This capability is provided via data base equation. In addition, data bases stored 
under other usercodes and on pack families not visible to a task may be accessed using data 
base equation. The term "data base equation" is used to collectively refer to three separate 
features: specification of data base titles during compilation, WFL equation to override 
compiled-in titles, and run time manipulation of data base titles. 

User programs employing data base equation must be compiled with Mark 32 compilers. Earlier 
release software and Mark 32 release software not using data base equation will continue to 
function as before. 



Data base equation is operationally similar to file equation. WFL equation overrides 
specification of a data base title in the host language declaration, and run time modification 
of a data base title overrides both WFL equation and source language specifications. However, 
data base equation differs from file equation in that a runtime error will result if a us 
program attempts to set or examine the TITLE attribute while the data base is open. 

Host Language Syntax 



lser 



The data base attribute TITLE is a string-valued attribute and, in each host 
<string expression> of the general form: 



language, is a 



<dat abase t i 1 1 e> 



( <usercode> ) 



< ident i f i er> 



ON < f ami ly name> 



<identifier> is a string not exceeding 17 characters in length and represents the directory 
node under which data base files are stored. <usercode> and <family name> convey their usual 
meanings. In the host language syntax diagrams below, <database title> must be a <string 
constant) when it appears in a <database declaration;,. The default <database title> is 
<database name> plus the control file usercode and family name, if any, from the description 
file. When <internal name) is not specified in a <database declaration), it defaults to 
<database name>. Syntax diagrams are only shown for those syntactic items whose definition has 
changed; the remaining item definitions may be found in the DMSII Host Reference Manual, form 
no. 5001498. 

Algol 



<database declaration) 

— DATABASE — <database reference>- 

<database reference) 



|-<internal name)- 
>-<database name> 



|-<logical data base name> — OF - 



(TITLE = <database title>) 



<data set reference) 

|-rset reference) | 
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The following examples show how the data base TITLE attribute can be manipulated during program 
execution. Note that <database title>s never end with a period and that a <replace 
pointer-valued attribute statement> is not valid for data base TITLEs . 



-<internal name>. TITLE 
-<string variable> — := 



:= — <database title > — 
< i n t e rna 1 name>. TITLE 



Cobol 



<database declaration> 
— DATA-BASE SECTION. 



<database reference) 

- DB 

-(internal option> 



-<logical db option> 




-<logical db option> 



<db spec> 

— <database name> 

|- GLOBAL 
> ALL <db attribute> — 



-<db attribute>- 



. <data set referenco- 
. <set reference) 



<db at t ribut e> 

VALUE OF TITLE IS — (database t i t 1 e>- 



The following CHANGE and MOVE statements can be used to manipulate the data base TITLE 
attribute during program execution: 

— CHANGE ATTRIBUTE TITLE OF < internal name> — TO > 

I-.N-! 

<database title> 1 

|- (alphanumeric data-item> -| 

— MOVE ATTRIBUTE TITLE OF (internal name> — TO > 

I- IN -I 

— (alphanumeric data-item> 1 



PL/ 1 
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<databasc declaration 

— DATABASE — <database designation> — <DM attribute list>- 

<DM attribute I i s t > 



ENVIRONMENT ( <db attribute list> ) 

OPTIONS 



i <- 



-/l\-<data set reference) — 

-/l\-<set reference) 

-/1\- EXTERNAL 

<db at t r ibute 1 i s t> 

— TITLE = <dat abase title> 



The following syntax may be used to manipulate the data base TITLE attribute during program 
execu t ion : 



— TITLE(< i nt ernal name>) — = — <database title> 

— <character variable) — = — TITLE( < i n t erna I name>) 



Host Language Examples 

In each of the examples below, the first OPEN statement will open LIVEDB whose data and control 
files are stored under the user's disk directory. The second OPEN statement invokes TESTDB 
whose files are stored on TESTPACK under the usercode UC. 

Algol 



BEGIN 

DATABASE MYDB (TITLE=" LIVEDB" ) ; 
OPEN UPDATE MYDB; 

CLOSE MYDB; 

MYDB. TITLE := "(UC)TESTDB ON TESTPACK" 

OPEN UPDATE MYDB; 

CLOSE MYDB; 
END. 



Cobol 



IDENTIFICATION DIVISION. 

DATA-BASE SECTION. 
DB MYDB ALL 
VALUE OF TITLE IS "LIVEDB". 

OPEN UPDATE MYDB. 

CLOSE MYDB. 

CHANGE ATTRIBUTE TITLE OF MYDB TO " (UC) TESTDB ON TESTPACK" 

OPEN UPDATE MYDB. 

CLOSE MYDB. 
STOP RUN. 



PL/1 
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EQUATE_DB: PROCEDURE; 

DATABASE MYDB ENV I RONMENT(TITLE= 'LIVEDB' ) ; 
OPEN MYDB OPTIONS (UPDATE); 

CLOSE MYDB; 

TITLE(MYDB) = ' (UC)TESTDB ON TESTPACK' ; 

OPEN MYDB OPT IONS (UPDATE); 

CLOSE MYDB; 
END EQUATE_DB; 

WFL Syntax 

A <databasie tit!e> in a host language <database decl arat ion> may be overridden via WFL during 
either program compilation or execution. The syntax of a WFL data base equation statement is 

— DATABASE <internal name> ( TITLE = <database title> ) 1 

The following example illustrates the use of WFL data base equation: 

? BEG IN JOB WFL/EXAMPLE; 

% 

% OVERRIDING EQUATION DURING COMPILATION 

% 

COMPILE USER/PROGRAM WITH BDMSALGOL LIBRARY; 

DATABASE CTIMEDB (TITLE = (UC)TESTDB ON TESTPACK) ; 

COMPILER DATA 

BEGIN % ALGOL SOURCE 

DATABASE CTIMEDB; 

DATABASE MYDB = RTIMEDB; 

DATABASE EQUATEDDB (TITLE = "LIVEDB"); 

OPEN CTIMEDB; 

CLOSE CTIMEDB; 
OPEN MYDB; 

CLOSE MYDB; 
OPEN EQUATEDDB; 

CLOSE EQUATEDDB ; 
END. 

?% END ALGOL INPUT 

% 

% OVERRIDING EQUATION DURING EXECUTION 

% 

RUN USER/PROGRAM; 

DATABASE MYDB (TITLE = SOMEOTHERDB) ; 

DATABASE EQUATEDDB (TITLE = (UC)HISDB ON THEIRPACK) ; 

?END JOB. 

Data base equation is recognized only by new WFL. Pre-29 WFL will not accept data base 
equation statements. 

CANDE Syntax 



On the Mark 32 software release, data base equation may be used through CANDE only in a WFL 
statement using new WFL syntax. For example, 

RUN DB/PROGRAM; DATABASE LIVEDB (TITLE = (UC)TESTDB ON TESTPACK) 
and 

WFL RUN OBJECT/DB/PROGRAM; % 

#* 

DATABASE LIVEDB (TITLE = (UC)TESTDB ON TESTPACK) 

wi 1 1 not work , but 

WFL BEGIN JOB; RUN OBJECT/DB/PROGRAM; % 

#% 

DATABASE LIVEDB (TITLE = (UC)TESTDB ON TESTPACK); END JOB. 

will produce the desired results. The "END JOB." is optional. 

USERCODES AND FILE SECURITY 



Both ACCESSROUTINES code files and data base control files are subject to normal file secun ty 
rules on Mark 32 software. These files should have their SECURITYTYPE attribute set to PUBLIC 
when they must be visible to user programs running under various usercodes. 

B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 DMS II - GENERAL 



B6000 SERIES MARK 32 



PAGE 172 



The following chart shows special actions that are necessary to allow a user program running 
under usercode X to open a data base whose control file and ACCESS ROUTINES code file are stored 
under various combinations of usercodes. This chart does not apply to user programs running 
under privileged usercodes or to data bases protected by guardfiles. 



(X) 



ACCESSROUTINES Code File Usercode 
(Z) 



(X) 



None 



.Specify ACR title 

in DASDL 
.ACR security PUBLIC 



.ACR security PUBLIC 



(Y) 



.Data base equation 
or spec i f y CF 
usercode in DASDL 

.CF security PUBLIC 



. Speci fy ACR title 
in DASDL 

.Data base equation 
or spec i fy CF 
usercode in DASDL 

.ACR security PUBLIC 

.CF security PUBLIC 



.Data base equation 
or spec i fy CF 
usercode in DASDL 
.ACR security PUBLIC 
.CF security PUBLIC 



.CF security PUBLIC 



.CF security PUBLIC 
.ACR security PUBLIC 
.Speci fy ACR title 
in DASDL 



.CF security PUBLIC 
.ACR security PUBLIC 



D3198 DMSII - UPDATING FROM MARK " 3 1 " TO MARK "32 DMSII" 

Mark 32 DMSII software may be used with the Mark 31 MCP on the B5000, B6000 or B7000. BSOOO or 
B6000 systems must use the Mark 31 PR1 or later MCP; B7000 systems must use the B7000 Mark 30 
PRO or later MCP. 

Some new features of the Mark 32 DMSII software require MCP support which is not provided on 
the Mark 31 MCP. The following features are only available when a Mark 32 or later MCP is 
used : 

a. Data base equation requires Mark 32 MCP and WFL. The Mark 31 MCP supports the new Mark 32 
data base stack structure; however, it does not recognize WFL data base equation. 

b. Swapping of data bases is only available on the Mark 32 MCP. 

The following procedure may be used to update to the Mark 32 DMSII release. 

1. Copy and compare the Mark 31 DASDL source, description file and system software to tape 
using Library Maintenance. 

2. Dump the data base files to tape using the Mark 31 UTILITY program. 

3. Load the Mark 32 DMSII software and perform DASDL update. In order to ensure an easy return 
to Mark 31, do not make any changes to the DASDL description of the data base during the 
update. Following successful update, Mark 32 system software will automatically be 
compi 1 ed . 

4. As a precaution, the data base files may be dumped using Mark 32 UTILITY. 

5. User programs will continue to run on Mark 32 without being recompiled. 

The following procedure may be used to return to Mark 31 software provided no changes were made 
to the DASDL description of the data base during DASDL update. 

1. Dump the data base files to tape using Mark 32 UTILITY. 

2. Backup copies of the audit may be made using COPYAUDIT. 

3. Reload the Mark 31 DASDL source, description file and system software from tape. 

4. Perform a RECOVER UPDATE of the control file using DMCONTROL. This will transfer the 
information from the Mark 32 control file to the Mark 31 control file. Do not RECOVER 
INITIALIZE the control file. 
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5 User programs compiled with Mark 32 compilers must be recompiled with Mark 31 compilers 
before they are run with Mark 31 ACCESSROUTINES . 

Several D-Notes contain information which is especially useful for conversion to Mark 32 DMSII. 

a. DMSII GENERAL D3108 

The data base stack structure has been changed to support Shared ACCESSROUTINES. 

b. DMSII GENERAL D3170 

Shared ACCESSROUTINES and data base equation are now available. With the introduction of 
these features, the data base open mechanism has been changed. 

c. WFL/COPYAUDIT D3270 

The ACCESSROUTINES now initiate copyaudit via a job file titled DATABASE/WFL/COPYAUDIT. 

d. BUILDREORGANIZATION D3084 

Database Reorganization has been simplified. 

e. REORGANIZATION D3120 

Reorganization has been significantly enhanced. 

f. INTERFACE D3229 

A single program may now invoke data bases compiled with software at different release 
1 eve 1 s . 
D328 8 DMSII - MARK "31" SYSTEM NOTES CORRECTIONS 
The system notes for the Mark 31 release contain errors, corrections for which are described 
b e 1 ow . 

"System File Page" indicates the page number in the file SYSTEMNOTES/REL3 10 contained on tape 
SYSTEMNOTES310; "Page" indicates the page number in B6000 Ser.es System Notes (Form No. 
5011257). 



DMSII D2868 System File Page 259 

Page 159 

Some DMSII Openerrors, which were not documented, are described as follows: 
Opener ror 

"40 User program must be recompiled on a more recent release. 

"41 Update level timestamp mismatch: User program and ACCESSROUTINES compiled with 
different description files." 

"42 Insufficient memory for SIB stack image." 

"43 Open Initialize not allowed by DASDL option." 



DMSII D2965 System File Page 261 

Page »60 

Under the procedure for returning to 30 software, paragraph 5 should be replaced by the 
fol lowing : 

"5 User programs compiled with 31 compilers must be recompiled with 30 compilers before 
they are run with 30 ACCESSROUTINES." 



BUILDREORG P2477 System File Page 308 

Page 189 

The fault caused by the error should read "SEG ARRAY", rather than "INVALID INDEX" 
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Appendix A Data Dictionary System File Page A-6 

Page A-4 

Line 600 of the Example for DDINITIALIZE should read as follows: 

600 COMPILER FILE TAPE=»DATADICT/DDINITIALIZE; 

D3302 DMSII - EFFICIENT USE OF INDEX SEQUENTIAL 

Appendix J of the DMSII Host Reference Manual (Form No. 5001498) should be replaced by the 
loll owi ng : r * 

The <key conditions which result in efficient searches at run-time are those which result in a 
VlVtl l f ^ arC ri f ? r v? t rif aSt 2 P"*»»Jh«?«»y search. For example, given an index sequential set 
S with key = (K1,K2,K3), and the following <key cond i t ions>s : 

S AT Kl = XI AND K2 = X2 AND K3 <relation> X3 

S AT Kl = XI AND K2 <relation> X2 

S AT Kl <relat ion> XI 

The conditions for optimization of <key conditions are: 

a. The <key item>s specified must include the highest order <key item> with no <key item>s 
omitted between the most and least significant <key item>s specified. 

b. All <key conditions on individual <key item>s are connected by "AND". 

c. With the exception of the least significant <key i t em> , all <key conditions must be in the 
torm : 

<key item> = <expression> 

d. The <relation> specified in the least significant <key condition> must be in one of the 
forms listed below: 



FIND Type 


Final Key 


<relat ion> 


FIND NEXT 


Ascending 


=.>,>= 


FIND NEXT 


Descending 


=.<.<= 


FIND PRIOR 


Ascending 


=.<.<= 


FIND PRIOR 


Descending 


=.>■>= 



If all the preceding conditions are satisfied, then at least a partial binary search is 
performed. ' 

NOTE 

Even though "FIND NEXT S AT <key condition)" is 
efficient, it is not as efficient as specifying "FIND 
NEXT S " . 

Since the "FIND KEY OF" form will never result in an I/O on the data set, it can often be used 
to great advantage. Often, the record may be selected or rejected based only on information in 
the key entry (including key data). If the record is to be selected, "FIND S" will retrieve 
■Bi«n e vL C L. '■ ! ltems from the data set - Although key data can be used advantageously via 
u i ^ u :.. ! y data ,tems used in a <key condition) cause a linear search on the index, and 
should be avoided. 

It is possible that a more complex selection condition> is desired than is optimized. In this 
case, it is best to extract some of the logic from the selection condition) and code it as 
tests in the user program. "FIND KEY OF" can often save time if a fair percentage of the 
records which satisfy the optimized selection expression) will be rejected. 

A range test is typical example. Suppose all records with Kl = XI and K2 = X2 and K3 >= Rl and 
Ki <= K2 are desired. Then, the <selection expression) 

NEXT S AT Kl . XI AND K2 = X2 AND K3 >= Rl 
can be used, and the processing of records stopped when the value of K3 exceeds R2 . 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 DMS II - GENERAL 



PAGE 175 
B6000 SERIES MARK 32 

D3314 DMSII - REBUILD ACROSS FILE DISCONTINUITIES 

Rebuilds can now be done across file discontinuities, even when no dump of the 
newly-initialized file is present. 

File discontinuities are caused when one or more data base files are initialized via UTILITY. 

When a UTILITY INITIALIZE is performed, all changes to the data base are audited. As a result, 
RECOVERY can rebuild through a UTILITY INITIALIZE even when the structure is not dumped 
following initialization. 

D3333 DMSII - MARK "31" SYSTEM NOTES CORRECTIONS 

The system notes for the Mark 31 release contain errors, corrections for which are described 
be I ow. 

"System File Page" indicates the page number in the file SYSTEMNOTES/REL310 contained on tape 
SYSTEMNOTES310; "Page" indicates the page number in B6000 Series System Notes (Form No. 
5011257). 



Appendix C TPS System File Page C-28 

Page C-17 

The syntax diagram for transaction journal> should not contain parentheses around <control 
file attributes> and <data file attributes> 



System File Page C-78 
Page C-45,46 

The ALGOL procedure UPDATE uses COBOL syntax in the two CASE statements of the procedure 
skeleton. These two case statements should read: 

CASE TRIN.TRFORMAT OF . . . 

CASE TRIN.TRSUBFORMAT OF . . . 



System File Page C-100 
Page C-58 

The syntax diagram which describes the SEARCH specification should be replaced by the following 
diagram which clearly shows that RANGE, USERS and SELECT must each be specified, but the order 
of specification is irrelevant. 

|<-/2»\ , 1 

— SEARCH — <journalid> — , /I\- RANGE <range options> 

-/1\- USERS <user option> — 

-/1\- SELECT <tr options> — 

Note: The "*" above the 2 implies that the path must be traversed a minimum of two times. 
D3 3 37 DMSII - DATA BASE STACK 

A stack cell containing software version informal ion has been added to all DMSII software. 
This word can be used to determine the software level of DMS software products from PROGRAMDUMP 
listings. In addition, the data base stack also contains a cell indicating the dollar option 
and DASDL options used during ACCESSROUTINES compilation. 

D3382 DMSII - AUDITING FOR HALT/LOAD AND ABORT RECOVERY 

As soon as possible after a new audit file is opened, the ACCESSROUTINES force two control 
points. Consequently, abort and Halt/Load recovery rarely have to back up beyond the beginning 
of the current audit file. Old audit files are usually archived for use in reconstructs, 
rollbacks, and rebuilds but are not required for either abort or Halt/Load recovery. 
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The following steps can be taken to automatically remove audit files once they have been 
closed. Compile the data base with either the COPY or VERIFY option specified for its primary 
audit and the secondary audit if one exists. The default title of the COPYAUDIT WFL deck is 
overridden as described in WFLCOPYAUDIT note D3270 and a user-written WFL job is zipped instead 
of the standard COPYAUDIT deck (DATABASE/WFL/COPYAUDIT) . 

The following WFL job illustrates how a user-written job substitued for the standard COPYAUDIT 
WFL job can be used to remove audit files. 

?BEGIN JOB REMOVEAUDIT (STRING PARMS , STRING SUBSYS); 
TASK REMOVETASK; 
STRING FILENAME, SCRATCH; 
EBCD I C DATA/F I LEREMOVER 
$ SET LEVEL 2 LINEINFO LIST 
PROCEDURE F I LEREMOVER ( FILENAME) ; 

ARRAY FILENAME!*] ; 
BEGIN 

BOOLEAN RSLT; 

REAL I; 

STRING FILETITLE; 

DEFINE ERRORTYPE = [39:20] #; 

SCAN POINTER(FILENAME) FOR 1:256 UNTIL = 48"00"; 

I := 256 - I; 

REPLACE POINTER( FILENAME) + I BY "."; % TRAILING PERIOD 

FILETITLE := STRING ( POI NTER ( FI LENAME) , 1-1); 

RSLT := REMOVEFILEfPOINTER(FILENAME)) ; 

IF RSLT THEN 

BEGIN % FILE REMOVAL FAILED 

CASE REAL(RSLT. ERRORTYPE) OF 
BEGIN 

10: DISPLAY ("ERROR IN AUDIT FILE TITLE = " CAT FILETITLE); 
30: DISPLAY( "AUDIT FILE " CAT FILETITLE CAT " NOT REMOVED")- 
ELSE: DISPLAY ("ERROR " CAT STRING (REAL (RSLT. ERRORTYPE) *)) : 
END; % ERROR CASES 

MYSELF . STATUS : = VALUE ( TERM I NATED ) ; 
END; 

DISPLAY ("AUDIT FILE " CAT FILETITLE CAT " REMOVED")' 
END. 
? % END FILEREMOVER SOURCE 

ON RESTART, 

GO TO STARTOVER; 

STARTOVER: 

% EXTRACT THE AUDIT FILE TITLE FROM THE COPYAUDIT PARAMETER 
% BUILT BY THE ACCESSROUTINES 

IF TAKE(PARMS,7) = "VERIFY " THEN 

SCRATCH := DROP (PARMS, 7) 
ELSE 
IF TAKE(PARMS,5) = "COPY " THEN 

SCRATCH := DROP (PARMS, 5) 
ELSE 

ABORT "UNEXPECTED PARAMETER FORMAT: " & PARMS; 
SCRATCH := TAI L( SCRATCH, " "); 
FILENAME := HEAD( SCRATCH .NOT " "); 
SCRATCH : = DROP ( SCRATCH , LENGTH ( F I LENAME ) ) ; 
SCRATCH := TA I L( SCRATCH, " "); 
IF TAKE (SCRATCH, 3) NEQ "ON " THEN 

ABORT " ON <FAMILYNAME> EXPECTED: " & SCRATCH; 
SCRATCH : = DROP ( SCRATCH , 3 ) ; 
SCRATCH := TAI L( SCRATCH, " "); 
FILENAME := FILENAME & " ON " & HEAD (SCRATCH, ALPHA ) ; 

IF FILE FILEREMOVER ISNT RESIDENT THEN 
BEGIN 

REMOVETASK (STATUS = NEVERUSED) ; 

COMPILE FILEREMOVER ALGOL [REMOVETASK] LIBRARY; 

ALGOL FILE CARD (TITLE = DATA/F I LEREMOVER ) ; 

SUBSYSTEM = #SUBSYS; 

OPTION = (FAULT, DSED, ARRAYS); 

IF REMOVETASK ISNT COMPILEDOK THEN 

ABORT "FILEREMOVER COMPILATION FAILED"; 
END; 

REMOVETASK (STATUS = NEVERUSED); 
RUN FILEREMOVER( FILENAME) [REMOVETASK] ; 
IF REMOVETASK ISNT COMPLETEDOK THEN 
ABORT "AUDIT FILE REMOVAL FAILED" ; 

?END JOB. 
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1)3460 DMSII - PREALLOCATION OF DIRECT DATA SETS 




of the required data blocks by storing a record with a large key value. He 
that a dump be taken of all preallocated rows to reconstruct any one of them. 

The new facility described below allows a fixed number of records to be preallocated when a 
direct data set is initialized via UTILITY. When the ACCESSROUTINES add a record anywhere 
within this preallocated area, no run time initialization i s. necessary . In addition, when tne 
structure is dumped via UTILITY, the preallocated areas are not dumped, but information is 
recorded that allows the structure to be reconstructed or rebuilt. 

1. Initializing Direct Data Sets 

The UTILITY syntax for the INITIALIZE option, described on page 4-24 of the DMSII Utilties 
and Operations Guide (Form No. 5001803) has been extended as follows to permit specification 
of the number of records to preallocate: 

— INITIALIZE — = 

<structure name> — <initialize options> 

<initialize options> 

I 

|- ( — PREALLOCATE — <integer> — ) -| 

<integer> specifies the number of records to be preini t ial ized . 

If a preallocation value is specified, UTILITY will write null records (direct key of all 

4"F"'s) into the specified number of record locations. For preallocated direct data sets 

word of block is used to point beyond the last record placed in the data base via a host 

language STORE statement. This value is called DATAEOF. LASTRECORD points beyond the last 

preallScated record. Note that DATAEOF must be less than or equal to LASTRECORD. After 

UTILITY has preallocated the data set, DATAEOF is set to the address of block 1, and the 
control file is marked to indicate that this is a different format direct data set from a 
normal direct data set. 

2. ACCESSROUTINES Use of Preallocated Direct Data Sets 

As a result of the preallocation feature for direct data sets, the ACCESSROUTINES audit a 
new record type (STRDC) whenever a structure is initialized. One STRDC record is audi ed 
for each initialized structure. STRDC records for direct data sets con ain the 
preallocation value, if specified. The DATAEOF value obtained from a preal ocated direct 
data set is checked for consistency at open time. If the value is incons i s tant , DATAWM- is 
set to F.LASTRECORD+1 and its new value is audited. 

A new record stored into the preallocated portion of a direct data set causes DATAEOF to be 
updated and the new value audited. The new DATAEOF value is the address of the first block 
beyond the newly added record. Storing a new record beyond the actual end of fi.e causes 
the ACCESSROUTINES to initialize new file areas. Following such physical extent ion ot the 
file, preallocated and conventional direct data sets are treated similarly by the 
ACCESSROUTINES . 

3. UTILITY Dump of Preallocated Direct Data Sets 

When UTILITY dumps all or a portion of a preallocated direct data set, the DATAEOF value is 
recorded in the tape directory. Only that portion of the direct data set be for e t h e DATAEOF 
block is actually written to the dump tape. If for some reason he DATAEOF v a ue is 
unavailable (perhaps row is locked out), all data set rows, including the preallocated 
ones, are dumped. 

4. UTILITY Reload of Preallocated Direct Data Sets 

If UTILITY needs to rebuild, reconstruct or copy direct data set rows that were in the 
preallocated region at the time of the dump, UTILITY simulates loading of these rows by 
preallocating them. In effect, preallocated rows appear to have actually been written to 
the dump tape. 

5. File Discontinuities Encountered during Rebuild 

When rebuilding through a UTILITY initialize of a direct data set with preallocated records, 
a STRDC audit record causes RECOVERY to mimic the UTILITY initialize by preallocating the 
appropriate records of the direct data set. 
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6. Recovering the Control File 

Whenever a direct data set is prea 1 1 oca t ed , its format level in the control file is set to 
1, indicating that word of block contains a DATAEOF value. If the control file is lost 
or destroyed, it should be recovered using a RECOVER UPDATE request to DMCONTROL and 
supplying a control file that has the correct format level for the direct data set. If a 
control file is used that indicates a normal (format level 0) direct data set when it is in 
fact format level 1, all software will work correctly except that UTILITY wi 1 1 dump both 
conventional and preallocated rows of the file. 

D3 548 DMSII - "DBS" IN LOCAL MEMORY VS. NONEXCHANGED UNIT 

If a Mark 31 or earlier data base has a SUBSYSTEM specified, and the processor selected from 
that subsystem has no path to the units containing the ACR codefile, any program attempting to 
open that data base will now get a DMOPEN error #53. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - GENERAL 



P3071 DMS 1 1 - "READLOCKNOPURGE" REMOVED 

READLOCKNOPUROE was used improperly in some instances It i s now properly T w\cCESSROUTINES 
where performance is an issue, and where only global variables are used. The A rcESSKOUllNfc» 
Ire the only software that requires READLOCKNOPURGE for locking global variables and exchanging 
global s . 
P3258 DMSII - NORMAL VS. DIRECT FILES AS PARAMETERS 

The DMALGOL comijiler was allowing direct files to be passed through formal parameters declared 
The DMAU^L compter was al ow, g ^ ^^^ p^ „„„ through direct file forma 

oarametet The compiler now generates warnings for each such occurrence. Consequent y DMSII 
software now passe! only dirlct files through direct file formal parameters and regular files 
through regular file parameters. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - ACCESSROUTINES 



D3044 ACR - COUNT FINDS AGAINST INDEX SETS 



f»!!I?-^? CK ™<l uests "?>ng an index are now counted in the data base usage statistics. FIND/LOCK 
ll^ttl \u * \, retr ' eve r .data set records (instead of FIND/LOCK KEY OF) will count as a find 
against the index and a find against the data set. 

In addition, statistics are now collected on global data set activity. 
D3045 ACR - STATISTICS INTERFACE 

A mechanism has been implemented via the DMINQ interface to the ACCESSROUTINES bv which 
statistics information can be retrieved from an active data base. Data can be retrieved 
concerning the data base as a whole or individual structures. Both dynamic statistics and 
static data can be independently retrieved. 

Statistics information is retrieved by passing a statistics request in an arrav via the DMINO 
interface to the ACCESSROUTINES. The format of the statistics "equest is as follows: Q 

Word - =25 

Word 1 - <structure number> 

Word 2 - <type statistics> 

Word specifies a statistics request to the DMINQ interface. 

Word 1 indicates the structure number for which statistics are desired or equals if elobal 
statistics are desired. 6 

Word 2 specifies whether static or dynamic data is desired. A value of zero indicates 
static statistics are desired; a value of one indicates dynamic statistics are desired. 

The ACCESSROUTINES will process the request and will return the result in the array startine at 
word 3. Words thru 2 will be unaffected by the ACCESSROUTINES. The format of the result if as 

lull OWS • 

Word 3 - statistics result word 

Word 4 - total number of words returned 

Word 5 - index to header word for sub-group 1 

Word[Word 5] - header word for sub-group 1 

WordfWord 5+1] - first data word for sub-group 1 

WordfWord 5 + n] - header word for for sub-group 2 

WordfWord 4-1] - end of statistics flag 

T«rmJ*lH diC ^ eS i. the re ] sult ° f the statistics request. If the request was correctly 
formatted and honored, this word will be zero. Otherwise, [0:1] will be equal to 1 and 
135:8] will contain an error category. The currently defined error categories are as 



1 - the structure number provided in word 1 did not 
correspond to an existing data set or set in the 



data base . 



2 - the statistics request type provided in word 2 was 
inval id (not or 1 ) . 



3 - a fault was encountered while retrieving statistics. 

Word 4 contains the total number of words returned in the array including all of the fixed 
words at the front of the array. 

Note: If the array provided is too small to receive all of the statistics, it will be 
resized. The array passed to INQUIRY must not be a segmented array. 

Word 5 contains the index of the first group of statistics information returned. Each group 
is preceded by a group header word indicating the type of the group and the number of words 
ot information in the group. 

The layout of this header word is as follows: 



[47:24] - not used 

[23:8] - group type 

[15:16] - number of words in group (including header) 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 DMS II - ACCESSROUTINES 



PAGE 1 8 1 



B6000 SERIES MARK 32 



The last group of statistics is followed by an e„d-of-s tat i s t ics header which has a group 
type of zero (0). 
The various group types and their layouts are as follows: 
I. Global Static Statistics (word 1 = 0, word 2=0) 
Group type 6 

Word - Contents 

1 Time data base opened (TIME(7) yalue) 

2 Maximum valid structure number in data base 
ii Data base options 

J ro-11 = 1 if statistics set in data base 

fill = 1 if data base is audited 
[2:1] = 1 if lockstatist ics set in data base 

Group type 5 

Word - Contents 
l-„ data base name including usercode prefix, if any. 
data base name is followed by 4"00 . 

II. Global Dynamic Statistics (word 1 = 0, word 2=1) 

Group type 1 

Word - Contents 

i Current data base open count 

2 Current numSer of users that have data base open 

for update 

3 Current data base open state 

= data base not open 

3 = data base is open 

4 = data base is undergoing recovery 

4 Maximum total buffer space in words 

5 Current total buffer space in words 

6 Current allowedcore value 

7 Maximum number of buffers allocated 

Group Type 2 (present only if STATISTICS is set) 

Word - Contents 

1 Number of forced data base overlays 

Forced overlays result when total buffer space 
exceeds allowed core. 

2 Number of normal data base overlays 

Normal overlays result when structures are 
closed or user program change from serial 
to random or random to serial state. 

3 Time statistics collections started or was last 

reset (TIME(7) value) 

Group Type 3 (present only if STATISTICS is set and data base is 

audited) 

Word - Contents 

1 First audit file number 

2 Current audit file number 

3 Starting audit block serial number 

4 Current audit block serial number 

5 Average number of words used in audit blocks 

6 Actual audit block size 

7 Number of audit I/O's initiated 

8 Total wait time accumulated on primary audit 

9 Tota" watt time accumulated on secondary audit 

in t i cks 
1? Eft „umoer C of nmer;roce S ses where held up at 

Tot^fuml^enfw^ting at BEGIN-TRANSACTION in 



12 
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t icks 
}3 J otal n«fflber of sync points taken 
J* J otal n » m ber of control points taken 
\i | otal , t,me s P el »t taking control points in ticks 

16 Sum of the number of buffers present at each 

control point 

17 Sum of the number of buffers flushed at each 

control point 

III. Structure Static Statistics (word 1 = structure number> 

word 2=0) 

Group Type 7 

Word - Contents 

1 Structure number 

2-4 Structure name (first byte is length in binary) 

5 Structure type 

2 = data set 
5 = index set 

6 Structure subtype (see PROPERTIES 10068000- 

7 c. . . 10094000) 
/ Structure nesting level (1 = disjoint) 

Structure block factor (in records for data sets 

in key entries for index sets) 
Structure physical block size in words (including 

integrity checking words) 
Structure area size in sectors 
J* * * | f structure is checksummed 

12 = 1 if structure is address-checked 

IV. Structure Dynamic Statistics (word 1 = structure number>, 

word 2=1) 

Group Type 8 

Word - Contents 

1 Current number of random access users 

^ Current number of serial access users 

3 Current number of buffers allocated for structure 

* Current number of big buffers allocated for 
structure 

?I°"!!_T* P f U <P resent only 'f STATISTICS is set) 
Word - Contents 

1 Number of physical reads against structure 

i Number of physical writes against structure 

i Number of ticks spent waiting for writes to 

complete 



8 



10 



Number of ticks spent waiting for reads to complete 
Total amount of I/O time accumulated on file 



Number of read-aheads issued against structure 
' Number of wnte-aheads issued against structure 

Group Type 9 (present only if STATISTICS is set and structure is 
a data set) 

Word - Contents 

1 Number of finds against data set 

2 U Um u er °i , Cre »te/Store's against data set 
i Number of Modify/Store's against data set 
* Number of Deletes against data set 

5 Number of times control information changed 

Group Type 10 (present only if STATISTICS is set and structure is 
an index set) 

Word - Contents 

1 Number of Finds against index set 

2 Number of inserts in index set 

3 Number of key data changes in index set 

4 Number of key deletions from index 
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No t e s : 

■ticks" refers to ticks of the processor clock at 2.4 micro- 

seconds/t ick. 
Groups may be returned in the array in any order. 



B6000 
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EXAMPLE PROGRAM 



The following program illustrates the mechanism by which statistics can be retrieved Thi< 
program writes all results to a file for later off-line analysis. "' lhls 

BEGIN 

DATABASE DB; 

FILE DBSTATISTICS(KIND=DISK,FILETYPE=4,SIZEOFFSET=4 

BLOCKSIZE=900); 
ARRAY A[0:4] ; % WILL BE RESIZED BY ACCESSROUTINES 
REAL MAXSTRNO; 
REAL I : 



DEFINE 

DMINQCASE = A 

STRNO = A 

TYPESTATS = A 



0]#, 
2]#, 



RESULT = BOOLEAN(A[3])#, 
TOTWORDS = A[4]#, 
GROUP1INX = A[5]#; 

DEFINE 

GROUPTYPE = [23:8]#, 
GROUPSIZE = [15:16]#; 

DEFINE ERR(MSG) = 
BEGIN 

DISPLAY(MSG); 

MYSELF. STATUS := VALUE (TERM I NATED ) ; 

OPEN INQUIRY DB; 

% GET AND WRITE OUT STATIC STATISTICS FIRST 



25; 

0; % TO GET GLOBAL STATISTICS 

0; % TO GET STATIC STATISTICS 



DMINQCASE 
STRNO 
TYPESTATS 
DMINQ[0](A); 
IF RESULT THEN 

ERR( "FAILED TO RETRIEVE GLOBAL STATIC STATISTICS"); 

% FIND GROUP TYPE 6 

I := GROUP II NX; % INDEX OF FIRST GROUP HEADER WORD 
WHILE A[ I]. GROUPTYPE NEQ AND A [ I ]. GROUPTYPE NEQ 6 DO 

I := * + A[ I]. GROUPSIZE; 
IF A[ I] .GROUPTYPE = THEN 

ERR(" INVALID RESULTS FOR GLOBAL STATIC STATISTICS") 
MAXSTRNO := A[I+2] ; 

% WRITE OUT GLOBAL STATIC STATISTICS 

A[3] := TIME(7); % TIMESTAMP IT 
WRITE(DBSTATISTICS, TOTWORDS, A) ; 

% GET AND WRITE OUT ALL STRUCTURE STATIC STATISTICS 

FOR STRNO := 1 STEP 1 UNTIL MAXSTRNO DO 
BEGIN 

DMINQ[0](A); 

IF NOT RESULT THEN 

BEGIN 

A[3] := TIME(7); 

WRITE(DBSTATI STICS , TOTWORDS , A) ; 
END; 
END; 

% NOW, GET AND WRITE DYNAMIC STATISTICS ONCE A MINUTE UNTIL 
% OPERATOR CHANGES TASKVALUE TO A NON-ZERO VALUE 

TYPESTATS := 1; % DYNAMIC STATISTICS 
WHILE MYSELF . TASKVALUE = DO 
BEGIN 

FOR STRNO := STEP 1 UNTIL MAXSTRNO DO 
BEGIN 

DMINQ[0](A) ; 

IF NOT RESULT THEN 

BEGIN 

A[3] := TIME(7); ' 

WRITE(DBSTATI STICS, TOTWORDS, A) ; 
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END; 



WMTANDRESET( (60) , MYSELF. EXCEPT I ONEVENT) ; 

END; 

LOCK(DBSTATISTICS) ; 
END. 



D3046 ACR - BUFFERS MOVED TO DATA BASE ENVIRONMENT 

j r,~ m th- structure environment to the data base 

D3047 ACR - ALLOW "AUDIT CLOSE" MESSAGE 

T- ti'n-i:'::: •'.? ft*:. k :::.:i::; !! , ,ft::.: , s. , Sai;::'«- - -:~i"'»" ,ail »- i,5! 

cause the audit files to be released. 
D3306 ACR - "B7700CODE" OPTION 
Because of some problems in the use of B7700 „. user dollar optionee ^TO^opUo^ha^been 

renamed the B7700CODE °P» ' °"'" h %* C ^ Generated ' i f the DMALGOL compiler has beer, compiled 
causes code optimized for the B7000 s to be g nefateo Mi DASDL compller opt , on 

with the B7700CODE °P*;°»- *ftj?_ t ftU D J. h ;? 1 i cause the B7700CODE option to be set when 
B7700 Setting B7700 while compiling UASUL win 
compiling the ACCESSROUTINES . 

D3315 ACR - FORCED, NORMAL OVERLAYS 
The data base statistics now include the number of forced overlays and^the ^J"*".^,^™ 
overlays in the buffer stat i sties rathe r than ,u.t the tot ^^ overUys occur when 

:T?:S?.rJ. , i?. t S.S..5""":.^'SS.:;S"~*-«5oI to serial or serial to random state. 

D3331 ACR - "ACCESSROUTINES" ERROR MESSAGES 

The ACCESSROUTINES recognize two general clmiie. ^ am ^ C *Pj i0 "fL ' [ne"' ACCESSROOTINES^cannot 
errors. Exceptions are "«" n « d reauested SatS management operation. Exceptions affect 
successfully or correctly complete a "ques « a a g ^ ei ms are u „affected 

only the user program detecting the except onalsMuatio Exception categories and 

unless the program receiving h * "^P 1 '°, er C " itt by DMSII software are documented in 
Appendix^of ...•J-TTlloS Referee Manual (Form nS . ,00U*.>. 
Errors detected by the ACCESSROUTINES are usually fata. ^^f h^ta^rrT fo^one of five 

data (2) detection of inconsistent control inform a .0 n ( 3) faul s .n t v, ^ ^ d 
a system resource limitation has been """gji^f^'J^^n alvSTEMERROR exception to all user 
!!?iams that'eurrenti^ ...rJ.^K.b^S^™" "" programs have exited the database, 
the database stack is terminated. 

I„ the process of terminating the database stack after a fatal error ^ ^^.J"",.^^!.^. .the 

ACCESSROUTINES display a me s s ag edesc r. b>"8 ^ e £ype o was detected and may contain a 

sequence number of the line in DA ™ BA SE/SYMBOLIC where structure . The message is displayed 

structure number if the error was related to a par icu ACCE SS ROUTINES were running when 

x*-v r s.,-«:-.:;.c!.. he rr»&iv™<*, r^gr—p i. a, so .^ to .„. taskfile of ,.,. 



the 

user program 



user prugi aiu. 

This note lists the texts of error messages that the ACCESSROUTINES may di splay ^nd, ,£ ".ch 

™ror, describes P»bjbl. cans, , . and po b^act.on^s) tha^ ^ j ^ ^ 3J „„„ 

s^ftware^'are no? fatal 'on' .K'il^ ™ -leaL are discussed. 

Error Messages 

^^rrt.:?.!;.:;::'-:, 1 :^-!:-..;^ si's:.....' K? b s.:. :;?". £ -ni°" n ,ii^ 

ABORT r SR S A/L°REc6vERY FAILURE OR DSED 

Ml Onerator DSed an abort or haltload recovery stack. 
Cause,: (1) Operator^e^ ^.^ ^^ ^ haUload recovery . 

Action: For Abort, running Recovery may fix the problem. 
AUTO SET ENTRY MISSING DURING DELETE 

Cause- While deleting a record from a dataset, the corresponding 
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entry in an automatic index set was not found. 

Note: This error is fatal only under a limited set of conditions. 
Refer to the discussion of integrity errors below. 

AUTO SET ENTRY MISSING DURING STORE 

Cause: While storing a modified record into a dataset, the 

corresponding entry in an automatic index set was not 
found. 

Note: This error is fatal only under a limited set of conditions 
Refer to discussion of integrity errors below. 

AUTO SET POINTS TO DELETED RECORD 

Cause: An entry in an automatic index set does not have a 
corresponding record in the spanned dataset. 

Note: This error is fatal only under a limited set of conditions 
Refer to discussion of integrity errors below. 

BAD DISK ADDRESS 

Cause: While attempting to read from a database file, a block 

address that did not correspond to a block boundary in the 
file was de tect ed. 

Note: This error is only detected if the DASDL option DATACHECK1 
1 s se t . 

BAD GO FORWARD 

Cause: Read error or corrupted table structure detected while 
deleting an entry from an index sequential set. 

BAD RECORD ADDRESS 

Cause: An address of a dataset record did not point to a physical 
record boundary. 

Note: This error is only detected if the DASDL option DATACHECK1 
1 s set . 

BAD SET TO OPERATION 

Cause: An attempt was made to read data from a dataset during a 
SET <set name> TO BEGINNING on one of its spanning index 
sets. 

CORRUPT DATA IN ORDERED DATA SET 

Cause: Corrupted control information detected in an ordered 
dataset . 

DATABASE HAS BEEN DSED 

Cause: Another user program has detected a fatal error or 

the operator has DSed the database stack. The database 
is being terminated. 

Note: This message does not result in a program dump. 
DB FILE NOT OPEN FOR ABORT DIVEST FOLLOWING DMSREAD 

Cause: An attempt was made to release a data buffer assigned to a 
structure whose file was not currently open. 

DBRECONSTRUCTION INTERLOCK FAILURE 

Cause: A user was in transaction state or an abort was pending 
after the database had been stopped for reconstruction. 

DIRECT KEY CORRUPTED 

Cause: An invalid key field has been detected while accessing a 
direct dataset. 

DIVEST ERROR 

Cause: An attempt was made to release a data buffer for reuse 
that was not in use. 

DMSREAD ERROR DURING ABORT 
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Cause- An I/O error occurred while trying to read from a structure 
file. 

DMSREAD ERROR ON RESTART DATA SET DURING ABORT 

Cause: An I/O error occurred while trying to read the restart 
dataset . 

ERROR DURING AUDIT FILE SWITCH 

Cause: Failure to open a new audit file following an I/O error 
on the previous audit file. 

ERROR IN BUFFER MANAGEMENT FOR FINAL CLOSE 

Cause- Data buffers were not properly written back to disk during 
the final close of a structure. 

ERROR IN CONTROL FILE HANDLING 

Cause- An error occurred while manipulating the database control 
file. A previously displayed message will indicate the 
actual error. 

ERROR IN DCB HANDLING 

Causes: Each data base buffer is controlled by its corresponding 
data control block (DCB). 

(1) A data control block has an invalid structure number. 

(2) Failure to allocate a new data control block or 
data buffer . ... • ■ i 

(3) Attempted to discard a buffer whiich is still in use. 

FAILED TO OPEN DB FILE FROM STRUCTUREFNS FOR ABORT 

Cause: The ACCESSROUTINES performed incorrect file handling 
during an Abort. 

FAILED TO SET RLAFILE.LASTRECORD 

Cause- The LASTRECORD attribute of the row lockout audit file 

was not set properly before Abort attempted to close the 
file. The operator issued more than one DS to the Abort 
stack . 

Action: Do not issue multiple DSs to the Abort stack. 
FAILURE TO SET LASTRECORD ON DB FILE 

Cause: Following a write error, t h e LASTRECORD attribute of a data 
file was incorrectly set. The operator issued more than 
one DS to the user program on whose stack the 
ACCESSROUTINES were executing when the write error was 
detected. 

Action: Do not DS a user program more than once. 
FAULT IN AiCR CODE 

Cause: A fault occurred while executing ACCESSROUTINES code. 
FAULT IN USER SELECTION EXPRESSION 

Cause: A fault occurred while evaluating the <key condition^ part 
of a selection expression> in a host language DELETE, 
FIND, LOCK, or MODIFY statement. Probable error in 
the user program (for example, an INVALID INDEX was 
detected while accessing a host language data item). 

Action: Correct the user program's selection expression;,. 

Note- This error is not fatal to the database. The user program 
will be DSed with an exponent overflow fault unless it 
directly handles the fault. 

I/O ERROR IN STORAGE CONTROL 

Cause- An I/O error was encountered while reading control 

information (such as the DKTABLE of a standard dataset) 
from a database file. 

Action: Reconstruct the affected row of the disk file- 

If the failure involves the restart data set, data base 
rebuild may be necessary. 
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Note: Prior to Mark 32, this error could also occur on writes. 
Occurences of this error following write operations have 
been eliminated on Mark 32 level software. Because control 
information is maintained in memory following writes, 
write errors can be ignored until a reread from the 
file is at tempted. 

IMPROPER MAXRECSIZE OR BLOCKS I ZE IN RLAFILE 

Cause: A file with the title <database name>/ROWLOCKOUTAUDIT 

was opened but is probably not a true row lock out audit 
file. Probable operational error. 

KEY AND DATA MISMATCH 

Cause: The key value in an index set does not match the key field 
of the data set record to which the index set points. 

Note: This error is nonfatal and is only detected when the DASDL 
option DATACHECK2 is set. Refer to the discussion of 
integrity errors for more information. 

LOGIC ERROR IN ABORT DKTABLE HANDLING 

Cause: The DKTABLE of a standard dataset was found to be 
inconsistent with the audit. 

LOGIC ERROR IN ROWLOCKOUTAUDIT HANDLING 

Cause: Abort tried to reinitialize the row lockout audit. 
OPERATOR DS OF DBS 

Cause: The operator has DSed the database stack. 

Note: This message does not produce a program dump. 
OUT OF CORE 

Cause: Insufficient memory was available to allocate a new 
restart area for the restart data set. 

PARTITION USER COUNT = 

Cause: A dataset partition is currently active but has no users. 
PARTITIONED STRUCTURE NOT IN PARTI T I OND I RECTORY (ABORT) 

Cause: Following an Abort, a partition file that should have 
been in the par t i t i ondi rec tory dataset was not. 

READ ATTEMPT ON UNOPENED PARTITION (ABORT) 

Cause: Abort tried to read from an unopened partition file. 
READ ERROR ON ROW LOCKOUT AUDIT FILE 

Cause: A read of the row lockout audit file failed. 
READ PAST END OF FILE 

Cause: The ACCES SROUTI NES attempted to read beyond the current 
end of file pointer of a data file. 

RLAFILE NOT INITIALIZED IN RECOVERY 

Cause: Abort tried to write to the row lockout audit file before 
the file was initialized. 

ROW LOCKOUT AUDIT CHECKSUM ERROR 

Cause: A checksum failure was detected on the row lockout audit 
file. 

ROW LOCKOUT AUDIT DATA ERROR 

Cause: The row lockout audit contains inconsistent information. 
ROW LOCKOUT AUDIT DB DTS/ACR DB DTS MISMATCH 

Cause: The database times tamps of the ACCES SROUTI NES and the row 
lockout audit do not match. Probable operational error- 
either the wrong row lockout audit or the wrong 
ACCESSROUTINES were used. 
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ROW LOCKOUT AUDIT LEVEL/ACR MISMATCH 

problem. The ACCESSROUTINES were either too old or 
too new for the row lockout audit. 

ROW LOCKOUT AUDIT TIME STAMP MISMATCH 

Cause- The timestamps of consecutive blocks in the row lockout 
audit file do not match. 

TOO MANY BUFFERS 
Cause : 



Ac t ion : 



The ACCESSROUTINES attempted to '' l °^"^ e ^ th 
4096 data buffers. This can occur in databases 
a very large number of structures. 

deduce A[LOWEDCORE°:i n ?eSuce r :re d L^i n urnuIo:r of buffers 
that can be allocated to each structure. 

TOO MANY LEVELS OF TABLES FOR I-S 

Cause- Too many levels of tables have been allocated for an 

EUher^organtzaHon or modifying index set tables sizes 
may help. 

UNKNOWN ERROR IN ACR 

The error handling procedure of the ACCESSROUTINES was 
CaUSC: lalleo ?o handle terror that it didn't recognize. 

UNKNOWN ROW LOCKOUT AUDIT RECORD TYPE 

Cause: The row lockout audit file contained a record with an 
unrecognized type field. 

UNRECOGNIZED AUDREC TYPE IN ABORT STRUCTUREFNS 

Cause- Abort returned an unknown audit record type to the 
ACCESSROUTINES . 

WAITERS ON UNLOCKED RECORD 

Cause: A user program was waiting to lock a record that was not 
locked. 

WRITE ERROR ON RLAFILE 

Cause: Abort detected an I/O error while writing the row lockout 
audit file. 

ZERO DISK ADDRESS 

Cause: A read was attempted on an invalid disk address. 

ZERO FIND ADDRESS 

Cause: An index set contained a record address of zero. 

Integrity Errors 

„„„ . ...-r...i ■."•''". «'""';.;j':ti'!i.b i„ p ",",c .!r, .:;.."?".. ::!..;./!?:•::,.;: 

displayed indicating the job and task mix numbers o '"= tha \ B dete ct non-fatal integrity 
aJ- category of „o.pt i ons c . s { r e turned^o^user ^oj.m ^^ J0) a „ d has the following 

subcategor i es : 

i Kev and data mismatch oiymj-b 

2 Automatic set or subset entry m .ting during STORE 

3 Automatic set or subset entry mi ss ... dur, »8 DELETE 

4 Automatic set or subset points to deleted record 
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to use corrupted in orltioi win cause a ' control information. Every program that try" 
v « luanon win cause a program dump and receive an INTEGRITYERROR exception 

D3338 ACR - PRINT STATISTICS OPTION 

state of the option is retained in ih. „„„»?'»• T^ CS OFF d, sables printing. The 

collection of the stat sties "fymav ttVl\ h n^ T u " in « the option off does not stop 

STATISTICS" or "STATISTICS RESTART" y The S t a e of ?h P P ^? ?Cd • V ' a th 5 Vitible DBS message 

in this manner. " ne state of the option is not affected by printing them 

D3366 ACR - SAVE AND RETRIEVE MESSAGES 

2.\rr: : , 'K.S. d «ti:»-:;:.r , f.rj.J:js!! iK-M^ras-r.s.is. y " ih " ■>■*> - ■- 

D3452 ACR - ABORT ACCELERATION 

itr^mage"' ^c'i.S" llV.l ""fter 111* inlV fHeS ' ? Bd ' l*™' re0 P en th - b ' f °" beginning 
reopen tne file.. This owning and c o ing 8 of ""^"daf a Ph {;^ ' 'f T° Uld agai ° cl ° Se d ° w " an * 
unnecessarily slow. g ot tile data base files caused Abort ♦- <-~ 



to be 



Ke. r 2:u:r ) f!?."o P e ::,.;%.s t : I *:? Bi f ; houid r™^ r r^ *°™ Nation- of s s. 

of Abort, especiallyfor data base w?th ma™ structures s '8»'f"a«t improvement in the speed 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 

DMS II - ACCESSROUTINES 

P2499 ACR - EFFICIENT PACK SPACE UTILIZATION 
When duplicated audit is used and bo.h ..-,...» o.di.J-jp^.^h. ACCESSROUTINES wU^ ^o^ 

continue to be filled and will be reflushed later. 
P2632 ACR - AUDIT RESTART INFORMATION CORRECTLY 

programs closed the data base when an ABORT was pending. 
P2633 ACR - DS OF "SECTORS REQUIRED" VS. RECONSTRUCTION 
If a program were DSed waiting for sectors on a data base file: 
1 The data base may have been left corrupted. 
2. Any reconstruct of the unallocated row would either fail or not correct the corruption. 

This problem has been corrected. 

Note: It is never a good idea to DS a DB program -.Jti-J [^^Vo"^ *J^-\™^^t 

P27 52 ACR - SYSTEM SERIAL NUMBER ADDED 

The system serial number has been added to the statistics heading. 
P2753 ACR - REMOVE "RSFILE" DECLARATION 

The Dl declaration for the restart data set has been removed. 
P2754 ACR - AUDIT FILE ERROR HANDLING 

A debugging facility has been added whicl , allows the ^^* '-^^-f ^-"^ " no^" incluo^ ?he 

tfo.IS p^ovruseful^fSrt „ec:L^y C to S run a COPYAUDIT ( on the audit. 
P27 5 5 ACR - FLUSH BUFFERS FOR STRUCTURE 

Previously, for unaudited data bases modifi puffers were not flushed ««»/» "^^J # 

iNQUIRr^ograms^emaineS^ctier^No;: 11 1 'Lit f i ed' SSf ? er /are flushed when the last updater 

of the structure closes the data base. 

,. addition, the number of users that have a structure open update and open in.uiry will be 

displayed in the structure status display. 
P2756 ACR - DO NOT SET INUSE FLAG 

TV A ^f a ?^ IN oc C :rr:d Se befo?e th the n au5its a weie ^uL^rf ul ! y ' o^nea^REcSvERY"^^ 6 re^ui i^a 

non-existent audit. This problem has been corrected. 
P2757 ACR - IMMEDIATE OVERLAY OF BUFFERS 

delayed and/or done improperly. 
P2788 ACR - DIVEST COMPACT TABLE BLOCK IF READ ERROR 

* *„i,i„ kinfk the table would remain marked in use. 
If an error occurred while reading a compact table block, the taoie wo 

The problem has been corrected. 
P2882 ACR - "ZERO DISK ADDRESS" FOR DIRECT DATA SET 

>u mn^v«i7P-1 FIND PRIOR failed with a ZERO DISK ADDRESS error. The 
For direct data sets with BLOCKSIZE-1 FIND PRIOR I a. e records in the prior d . rec t . on were 
ACCESSROUTINES were not stopping correc J»J ™and Not f ound/Se 1 ec t Text Error exceptions 
^rnlt^eturned'coirect^rfor^ecf daffs^r These problems have been corrected. 
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P2883 ACR - QUICK FIX CREATES EMPTY AUDIT FILES 

YHhw ^f[ tain editions, if a quick fix is done while the data base is open inquiry, an empty 
audit file would be created. This problem has been corrected. empty 

P2885 ACR - REUSE EMPTY AUDIT CORRECTLY 

If all audits were on pack or disk and the audits were empty (contained onlv block 0} at .k» 
IXI.tFZ ACCESSROUTINES picked them up for reuse, P t hVf?rst oiock o, thS Sudi would be 
discarded. This problem has been corrected. ° De 

P2886 ACR - "RECONSTRUCT" MAKES EMPTY AUI IT FILES 

RECONSTRUCT can produce empty audit files if run while the data base is open inquiry. 

P2948 ACR - DISPLAY REASON FOR NOT REUSING AUDIT 

If the ACCESSROUTINES do not reuse the current disk or pack audits, a message will now be 
displayed explaining the reason for not reusing the audit file(s). 

P2949 ACR - UNLOCK PARTITION IF "DS" IN OPEN 

If a program was DSed while waiting on a NO FILE for a partition, it would be impossible to 
open the structure again. This problem has been corrected. impossible to 

P2950 ACR - "INVALID OP" WITH READAHEAD 

The ACCESSROUTINES no longer faults with an INVALID OP when READAHEAD is set on an index 
LOCK e pRIOR) SCt ° r SUbSet ' Formerl y. this could only happen on a FIND PRIOR (or DELETE PRIOR? 

P2964 ACR - DATA BASE MESSAGES 
IcCES f SROuTiNES? han8eS ^ bee " made '" DISPLAY and ACCEPT messages originating from the 

1. Data base name prefixes all messages except those from the visible DBS. 

2 ' abor!™ FOR ABORT " "essages contain the mix numbers of the job/session and task causing the 

3. Data base fatal errors display the ACCESSROUTINES sequence number where the error was 
aeiecteo. 

4. Some messages have been shortened. 

P3003 ACR - BAD AVAILABLE TABLES FOR COMPACT DATA SET 

biock 6 ^hf'enVI^wifJ^nnw hrH! able H t 2 b, V ,try th8t g° es ."°' correspond to the actual data 
ACCESSROUTINES discarded and ignored. Previously, a fault could occur in the 

P3030 ACR - NESTED "STARTDB" ERRORS 

When running INQUIRY against an ACCESSROUTINES compiled with DEBUG set (an internal debuajrine 

?i?°>v' h L data ""J 6 , W ° UU die With a BAD L ° CK error ' due *° »"t«l STARTDB calls 8 fh.f 
problem has been corrected. «# ■.•*». una 

P3031 ACR - "I/O" TIMEOUT 

When an I/O operation times out the ACCESSROUTINES could cause certain user programs to be 

??n d .llv e ™?e ?H " ™- '" W K! Ch t h£ l'° CVent Was declared had been exited jus? bffore the I/O 
finally completed. This problem has been corrected. 

P3033 ACR - DATA BASE SUBSYSTEM VISIBLE 

?hI in L data K baSe '■^'•"•■tion, the ACCESSROUTINES now store the subsystem task attribute of 
„ r a t b "« /*" k; consequently, ACCESSROUTINES code segments running on user s acks can 
ensure that ZIPed jobs run in the same subsystem as the data base stack. 

P3101 ACR - NESTED "STARTDB" 

STlRiAS der ?£ Set to . Be 8 innin 8 «>|» on an access via the INQ interface would execute nested 

IIcoI??ruct ThU U nr^i a m P 2 ten K ,al P roblem * hen attempting to stop the data base for Abort and 
Reconstruct. inis problem has been corrected. 

P3106 ACR - INTERFACE TO FREE STACK RECORDS 

ACCFSSROUTINe! ,o PP ?iL f ?h S ur P > Pabl S data base ?.. an interface has been implemented in the 
ACCbSSKOUTINES to allow the MCP to free a specific stack's locked records. 
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P3175 ACR - CONTROL FILE "I/O" LOCK 

A lock has been added to the control file module to enforce single-threaded I/O operation 

against the data base control file. 
P3176 ACR - FAULT ON REBLOCKED STANDARD DATA SET 

has been corrected. 
P3177 ACR - TOTALCORE PROTECTED BY MEMLOCK 
Memlock is now acquired before the variable Totalcore is updated. Previous.y, the 
ACCESSROUTINES incorrectly acquired the Olaylock. 

P3178 ACR - PREVENT "COPYAUDIT" ZIP DELAY 

ilsj-i:.!!':.:*:::? :3?:%;-:.i;.:v?i: :;:::■.,•?:. wz.s' ,srS5R--s::\.!: 

corrected. 
P3230 ACR - DELETING VARIABLE FORMAT RECORDS 

j.'-^r!^s^s-u:-ti-:.Jtl:!i"j.::'itS!-a!ri.:K^i , »::::iJS.T:j: •-'•'"* 

P3246 ACR - "ERROR IN DCB HANDLING" 

corrected . 
P3247 ACR - "DBSINFO" REPLACES "MYNUMBER" 

1, „.n a \\ n f pflch structure environment in the data base 
Prior to the Mark 32 release, s ack cell < 2 ^>°' d e S YNUM ^ER in the ACCESSROUTINES). Because of 
stack (DBS) contained the •*"^"»^te D3?08) to support shared ACCESSROUTINES (DMS II note 
the reorganization of the DBS (DMS II nole W »"»> }° j^Vrk 32 DBSs . The MYNUMBER stack eel 
D3170), structure environments have moved to U LJJ '£ ™ a DB SINFO, and contains additional 
.ocated at (3.2) in each environment ^li s aLi Hona. inf^rmat i on can be used to facilitate 
information on Mark 32 level soitware. i,"' s * f DB SINFO is 
the interpretation of DBS program dumps. The foimat of DBblNl-u 

47- ni DBSINFOLTMDF Structure has LOCK TO MODIFY DETAILS 

47:01 DBSINhOLlMUf ^^ compiled irito it (Datasets only). 

46:01 DBSINFOREMAPF Structure is remapped (Datasets only). 

45 01 DBSINFOSPANNEDF Structure is spanned by an index set 

(Datasets only), 

4401 DBSINFOMANSPANNEDF Structure is spanned by a manual 

subset (Datasets only). 

43-01 DBSINFOSUBSETF Structure is a subset (Index sets 

only) . 

42 . 1 1 Not used . 

,,.„« DBSINFOLEVELF Embedding level of structure; 

31:08 DBbUNrumvi^r Disjoint structures are at level 1. 

23:04 DBSINFOSUBTYPEF SUBTYPEF property of the structure. 
19:08 DBSINFOTYPEF TYPEF property of the structure. 

11:12 DBSINFOSTRNUMF Structure number. 

P3259 ACR - MISSING DIVEST ON DEADLOCK 

been corrected. 
P3284 ACR - "DCB" HANDLING ERROR 

i:.a"i:"?:,r'..Ka:"i.3.:."::*-^" ! !J8i *.«"» *aw&--s .«-..» .ki. - b - 

structure. The problem has been corrected. 
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P3312 ACR - BAD LINKS WHEN OPEN INQUIRY 

Previously, the ACCESS ROUTINES tried to fix-up bad links when the user had only opened the data 
base inquiry This caused an error in DCB handling at close time since here shoud be no 
modifications to the data base when it was open inquiry mere snouio oe no 

P3313 ACR - LINKS ON SELECT TEXT ERROR 

When performing a find via a link, if the select text expression failed for the reman 
referenced by the link, the ACCESSROUTINES would erroneously treat the link as a bad link P 
Depending on the link type, the ACCESSROUTINES would either try to fix-up the link o? make it 
ex'eptiol " h8S bee " corrected - The ACCESSROUTINES wi 1 1 P „ow return a WTFOUND 

P3314 ACR - INVALID "INQUIRY" FUNCTION NUMBERS IGNORED 

Invalid DMINQ function numbers will now be ignored by the ACCESSROUTINES. 
P3 33 3 ACR - STORE RESTART AREA 

In the event that users of a data base are DSed, the DSed programs could receive a deadlnrk 
exception when the ACCESSROUTINES stored their Restart Arefs. Those user programs recefv?n» 
the except. on would not have their Restart Areas stored. This problem has been Erected § 

P3 340 ACR - STANDARD "VF" CONTROL WORD CORRUPTED 

When a Standard Variable format data set which utilized reblocking was extended the control 
n°^K. '" , new 'y allocated blocks were not initialized corrfctly. In new blocks thl 
Datablockflag was not initialized to zero. As a result, FIND NEXT through the dlta et hand ed 
correc?e5. " '' ^ *"' data bl ° CkS """""l valid records. 8 ThU problem hat o^n 

P3368 ACR - DO NOT POINT LINKS AT OVERFLOW BLOCK 

Previously links to compact data set records which had overflowed their original data block 
pointed at the overflow block. If the record was modified and relocated to another bock the 
link no longer pointed to the record. This problem has been corrected. L k compact data 
set records now always point to the original data block entry. compact data 

P3369 ACR - MISSING DIVEST FOLLOWING VERSION ERROR 

det^tfnr c ircums ' ances > t»e ACCESSROUTINES were not releasing data buffers following 

"fn u e« data burfer°Lfnr r ° r .. eXCepti0nS - Consequently. the ACCESSROUTINES wou.d deec? a* 

ln-use data butfer before all user programs had closed a structure anH i,,„;„,,„ (t „ i 7 
base stack for an "ERROR IN DCB HANDLING". The problem occurred when a ull program that Sad 

en '"' ld ' led ^ a data base reorganization thaV altered data set rec r o a 1 

correctly re?ea rdCa'bufferr? IT' VU °?' ° f ' * ss P anni "« •« * • • The ACCESSROUTINES* now 
correctly release data buffers following versionerror exceptions. 

P3 3 70 ACR - FORGET SUBBLOCK FOR ORDERED DATA SET 

Tl!hhl^ d « re f n data ?f t s, with u subblocks are used, the ACCESSROUTINES keep track of empty 
subb ocks in available tables linked from block zero. Empty subblocks may result from record 
dele ions or creations. Previously, new available tablet Were a en o e 

L ' C t l\ n - When , lo "8 <*■-» were present, many I/Os were eq re o maintain he 
chain. Now, new tables are always added to the beginning of the chain. maintain tne 

P3 371 ACR - ZEROED OUT BLOCKS IN DATA BASE 

procedure' 'duMPBUFFERs" 1 ^!^, Tl° wH ' ten back »° Jhe data base. This happened when the ACR 
prevented. DUMPBUFFERS attempted to write back a deallocated buffer. This is now detected and 

P3383 ACR - PARTITION OPEN ERROR 

narHttnn! °! i^A * * ^ 6 ' ' ' H'" P ro 8 ram that received a LIMITERROR for trying to open too many 
CONTROL^LE ^ partitions to ?.if with P a n ERROR IN 

P3 393 ACR - ERRONEOUS "BIO/AIO" AUDIT RECORDS 

P3553 ACR - INVALID STANDARD VARIABLE FORMAT RECORD TYPES 

GETI)lTAlDDRFSS en n a a ^H 'J"i!' rd , var ! abl \ f ° rma t record was allocated from end of file, 
OfclDArAADDRESS placed high-value in the record type field. Later, STORE placed the correct 
record type and other data values in the record. I f STORE terminated with an exception the 
record was added to the available chain but the correct record type wat not placed In he 
record Subsequent additions to the structure would eventually reuse The tecSrd and he 
r?^H -^°£ d ^ tyP ? W ? Uld u the " be 'verted. The ACCESSROUTINES were capable of bypass n 
records with high-value in the record type, but other software failed when encounte? ng ?„em * 
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the wri te t imed out , 
revious ly-ini t i a ted I/O 
ating segment zero of a 
audit file received the 
ing for this I/O to 
thcr than segment zero, 
d the timeout, as well 

Two messages will then 
the ACCESSROUTINES i s 
r is appropriate). The 
g. This strategy is 



Now, the ACCESSROUTINES always initialize newly-allocated records with the record type and 
invalid record text. 
P3 5 54 ACR - PARTITION AUDIT RECORDS OUT OF ORDER 

PARtItIONNAMES ?3T. ■:j: t wr?;!Si d .o r :J!'2iiT!. V^r-rP^audl^reco^JI^I^hl .«j£ 
of t" gSrmONDIRBCIORY «5 PARTITIONNAMES table PRIOR to the change indicated by the CPNT 
was wr i 1 1 en . 

This problem could be manifested in REBUILD, RECONSTRUCT or Halt/Load RECOVERY as a "PARTITION 
NAME TABLE INCONSISTENT WITH AUDIT" error. This problem has been corrected. 

P3606 ACR - LINEAR SEARCH WITH SIGNED NUMERIC KEYS 

A fault in the ACCESSROUTINES no longer occurs when a linear search is done on a signed numeric 

key . 
P3618 ACR - CANCEL OR COMPLETE "I/O" FOLLOWING TIMEOUT 

Previously, if the ACCESSROUTINES initiated a wri te to an audi t Ml e and 
it was possible for the user program to be DSed w th an I/O ERROR 17 (p 
was neither completed nor cancelled). Now, if a timeout occurs when upd 
nack or disk type audit, a message will be displayed indicating which 
1'tmeou? aTong" with a message indicating that the ACCESSROUT NES is wait 
complete If a timeout occurs when updating any audi tfi le segment o 
the ACCESSROUTINES will display a message indicat ing which audit receive 
as the location (FAMILYNAME or magnetic TAPE un i t number) of the f le 
be displayed indicating the last good audit block, serialnumber and that 
waiting for the I/O complete on the primary or secondary audit (wh cheye 
ACCESSROUTINES will then wait for the I/O to complete before continuin 
necessary since I/O operations to disk cannot be cancelled. 

P3683 ACR - ORDERED DATA SET DIVEST ERROR 

Followina an error result returned by a call on GETDATA, the ordered data set DATAFINDER 
orocedurf w. Ui ? recll GETDATA passing DCB number zero. Since DCB zero ,s never used, 
?heda?a bale stack was DSed for a divest error. The problem has been corrected. 

P3696 ACR - "DMSECURITYERROR" 

Previously if two or more application programs opened a data base following a Halt/Load and 
The appca on program which initiated Halt/Load recovery was not tie f.r. piog « to 
continue processing Ifter Recovery completed. that program would be terminated with a 
DMSECURITr" ERROR exception. This problem has been corrected. 

P3697 ACR - FAIL TO DIVEST 
Previously an attempt to lock global data which resulted in a Deadlock exception would fail to 
divest the buffer. At final close of the structure, this would result in data base failure 
with "ERROR IN BUFFER MANAGEMENT FOR FINAL CLOSE". This problem has been corrected. 

P3708 ACR - INFINITE LOOP 
The ACCESSROUTINES may get into an infinite loop before firing up ABORT in the following 
s i tuat ion : 

Program PI which is running at a high priority has locked record R. Program P2 which is 
running at a very low priority wants to lock record R. and so waits for the record to become 
available. Program PI is DSed and is attempting to initiate ABOR1 . 

This problem has been corrected. 
P37 5 5 ACR - "NOTLOCKED" EXCEPTION 
Previously it was possible for one user to get a NOTLOCKED exception when doing a CREATE-STORE 
on In ORDERED data set if his current path pointed to a record that was in the process of being 
delected by another user. This problem has been corrected. 

P3773 ACR - "FORGETSPACE" TIMING WINDOW 
A timing window in the ACCESSROUTINES buffer overlaying procedure (FORGETSPACE) could result in 
the following problems: 

1. Data base stack terminates abnormally for a "FAULT IN ACR CODE". 

2. A buffer of zeroes (with valid checksum) is written to the data file. 
These problems have been corrected. 
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P3789 ACR - CANNOT LOCATE COMPACT RECORD 

A SEG ARRAY error may occur within the ACCESSROUTINES if one program is attempting to FIND a 
compact data set record, while another program is in the process of STOREing an update version 
of that same data set record. This problem has been corrected. 
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DMS II 



ARCHIVEUPDATER 



D3614 ARCHUPDATE - ELIMINATE "OPEN INITIALIZE" 

The OPEN INITIALIZE command has been de-implemented. ARCHIVEUPDATER can no longer 
INITIALIZE a data base. LOADDUMP now opens the data base UPDATE instead of INITIALIZE, 



OPEN 
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DMS II - ARCHIVEUPDATER 



P3341 ARCHUPDATE - PREVENT SORT ERROR #4 

ARCHUPDATE now computes the amount of sort disk based upon 
errors which result from insufficient work disk. 



input volume. This prevents sort 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - BDMSALGOL 



1)3 3 24 BDMSALGOL - PRINT DATA BASE TITLE 

Data base equation information is now printed following the data base declaration when SLISTDB 
is set. 

D3440 BDMSALGOL - COMPILER IDENTIFICATION 

The compiler identification line appearing at the beginning of printer listings now identifies 
the BDMSALGOL compiler as "BDMSALGOL" instead of "ALGOL". 

D3467 BDMSALGOL - IMPLICIT FREE FOR "FIND, LOCK" 

The DMSII HOST Manual incorrectly describes when implicit FREEs are done for FIND and LOCK 
statements. The description of FIND and LOCK should be modified as follows: 

"FIND and LOCK always FREE the previously-locked record when the operation uses a data set. 
When the opera t i on uses a set, the pr ev i ous 1 y- locked record is implicitly FREEd only when a 
new record is located in the set." 

D3552 BDMSALGOL - DEIMPLEMENT "OPEN INITIALIZE" 

The OPEN INITIALIZE construct has been de impl ement ed . The compiler no longer recognizes this 
cons t rue t . 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - BDMSALGOL 



P3296 BDMSALGOL - TRANSACTION RECORD PARAMETERS 

!c^»nS° L ? om P iler generated incorrect code for accessing NUMBER type items of TRANSACTION 
KBCUKIK> winch were formal procedure parameters. When a record was passed as a parameter which 
was shorter than expected, the procedure was able to read from and write into memory beyond the 
end ot the short record area without getting an INVALID INDEX. 

This problem has been corrected. Now, an INVALID INDEX occurs when an attempt is made to 
reference an item beyond the end of the actual transaction record. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - BDMSCOBOL 



D3 3 25 BDMSCOBOL - DATA BASE EQUATION INFORMATION 

The data base equation information is now printed along with other data base information as a 
comment in the DATA-BASE section. 

D3467 BDMSCOBOL - IMPLICIT FREE FOR "FIND, LOCK" 

The DMSII HOST Manual incorrectly describes when implicit FREEs are done for FIND and LOCK 
statements. The description of FIND and LOCK should be modified as follows: 

"FIND and LOCK always FREE the previously-locked record when the operation uses a data set. 
When the operation uses a set, the previously-locked record is implicitly FREEd only when a 
new record is located in the set." 

D3 5 55 BDMSCOBOL - "OPEN INITIALIZE" DEIMPLEMENTED 

The OPEN INITIALIZE construct has been de impl ement ed . The compiler no longer recognizes this 
cons t rue t . 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - BDMSCOBOL 



P2730 BDMSCOBOL - "BDMSCOBOL" GENERATES BAD PRINT LINE 

BDMSCOBOL generates a bad print line for DATAITEM REAL(12,12), causing errors in 
AUDIT-REPORTER. This problem has been corrected. 

P2731 BDMSCOBOL - "INVALID INDEX" 

The compiler faulted on the following statement, where B is a Boolean in a data base: 
COMPUTE I=B+1 

This problem has been corrected. 

P3085 BDMSCOBOL - TRANSACTION ITEM, " 1 " OR "2" CHARACTERS 

The compiler gave a syntax error when referencing a transaction item with a one- or 
two-character name. This problem has been corrected. 

P3588 BDMSCOBOL - INVALID HEADER 

Incorrect information was stored in the invocation list in the code file for a transaction 
subbase invocation. This no longer occurs. 

P3 5 89 BDMSCOBOL - "INVALID INDEX" 

The compiler aborted with an INVALID INDEX when compiling a DMSII program that had the 
DATADICTINFO option set. This problem, which occurred only when invoking a large data base, 
has been corrected. 

P3590 BDMSCOBOL - "INVALID INDEX" 

A syntax error in an OPEN statement no longer causes an INVALID INDEX. 

P3591 BDMSCOBOL - "DB-INVOKE" HARDLY READABLE 

Picture and Usage information in a COBOL listing with DB-INVOKE was printed in specific 
columns, making the data base information unreadable. This has been corrected. 

P3635 BDMSCOBOL - "INVALID OP" ACCESSING GLOBAL DATA ITEMS 

When a data base was declared global in a bound-in COBOL procedure, an attempt to access global 
DM-data-i terns resulted in an INVALID OP. This no longer occurs. 

P3636 BDMSCOBOL - LINEAR SEARCH SELECTION EXPRESSION 

The COBOL compiler will no longer generate incorrect code (which caused an INVALID OP) when the 
following conditions are met: 

1. The data base is declared to be global. 

2. A selection expression causes a linear search. 

3. The key item referenced is accessed by other than its default character type. 
P3 803 BDMSCOBOL - "DUMP PRINTER ( <DATASET-NAME> ) " STATEMENT 

The following BDMSCOBOL statement caused bad code to be generated: 

DUMP PRINTER ( <dat ase t-name> ) 

The compiler attempted to reference the spanning sets as if they were data-items. This no 
longer occurs . 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - BDMS/PL/I 



D3467 BDMSPLI - IMPLICIT FREE FOR "FIND, LOCK" 

The DMSII HOST Manual incorrectly describes when implicit FREEs are done for FIND and LOCK 
statements. The description of FIND and LOCK should be modified as follows: 

"FIND and LOCK always FREE the prev i ous 1 y- locked record when the operation uses a data set. 
When the operation uses a set, the previously-locked record is implicitly FREEd only when a 
new record is located in the set." 

D3556 BDMSPLI - "OPEN INITIALIZE" DEIMPLEMENTED 

The OPEN INITIALIZE construct has been deimpl ement ed . The compiler no longer recognizes this 
cons t rue t . 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 DMS II - BDMS/PL/I 



PAGE 204 
B6000 SERIES MARK 32 



SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - BDMS/PL/I 



P2842 BDMSPLI - "PL/I" COMPILER LOOPING 

When a nonexistent data set or set was listed in a data base declaration, the PL/I compiler 
sometimes looped. This problem has been corrected. 

P2843 BDMSPLI - TRANSACTION ITEMS 

The following problems have been corrected: 

1. Mul t i -d imens i ona 1 transaction items could not be referenced. 

2. Transaction items could not be used as operands of expressions (other than simple 
as s i gnment s ) . 

3. Numeric transaction items could not be used as operands of builtin functions. 

P2844 BDMSPLI - MOVING DATA BASE ITEMS 

The following assignment statements all generated incorrect code (where DB1 through DB5 are 
databaseitems): 

DB1(1)=DB1(2) ; 
DB2,DB3=DB4; 
DB5,X=DB4; 
P:PROC(Y); DCL Y PIC 'H' ; 
Y=DB6 ; 
END P; 

These problems have been corrected. 

P2845 BDMSPLI - "XREF" OPTION WITH "BDMS" 

When the XREF option was set when compiling a PL/I program which invoked a data base, the 
compiler faulted with an INVALID INDEX. This problem has been corrected. 

P2846 BDMSPLI - INCORRECT "BDMS OPEN" STATEMENT 

When the keyword "OPTIONS" was omitted from a data base OPEN statement, the compiler failed to 
generate an error message; instead, it generated code to open UPDATE. 

Ex amp I e : 

OPEN TESTDATABASE (INQUIRY); 

This statement caused open update and no error message. This problem has been corrected; an 
appropriate error message is now given. 

P2 847 BDMSPLI - MULTIDIMENSIONAL "DMS" ARRAYS 

The PL/I compiler gave syntax errors for correct references to data base items with more than 
one subscript. This problem has been corrected. 

P2848 BDMSPLI - BUILTIN FUNCTIONS AND "BDMS" 

When a DM Variable was the operand of a builtin function such as ABS ( ), MIN ( ) or MAX ( ), 
the value of the variable was sometimes erroneously integerized. This problem has been 
cor rec ted . 

P3 209 BDMSPLI - "CREATE" STATEMENT 

On the initial Mark 31 release of PL/I , the CREATE statement did not work properly when nested 
two or more levels deep in procedures. This problem has been corrected. 

P3210 BDMSPLI - "DATADICTINFO" 

A data base with no global data caused the PL/I compiler to loop when the dollar option 
DATADICTINFO was set. Now, the compiler will no longer loop. 

P3594 BDMSPLI - "PUT EDIT" OF DATA BASE ITEMS 

Attempting to use a data base item in the I/O list of a PUT EDIT statement produced a syntax 
error, "ILLEGAL I/O LIST ITEM". Now, use of data base items in PUT EDIT statements works 
correct 1 y . 
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P3595 BDMSPLI - DATA BASE "BINDINFO" 

The PL/I compiler no longer generates incorrect BINDINFO for data base structures. 

In addition, SYSTEM/PR I NTB I ND INFO now correctly handles BINDINFO for data base structures; it 
no longer loops endlessly. 
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DMS II - BDMSCOBOL74 



D3 545 BDMSCOBOL74 - "BDMS" OPTION IMPLEMENTED 

The COBOL74 compiler now supports the BDMS option. The features provided under this option 
were previously described for COBOL(68). 

D3555 BDMSCOBOL74 - "OPEN INITIALIZE" DEIMPLEMENTED 

The OPEN INITIALIZE construct has been de impl ement ed . The compiler no longer recognizes this 
cons t rue t . 
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P3 5 88 BDMSCOBOL74 - INVALID HEADER 

Incorrect information was stored in the invocation list in the code file for a transaction 
subbase invocation. This no longer occurs. 

P3 5 89 BDMSCOBOL74 - "INVALID INDEX" 

The compiler aborted with an INVALID INDEX when compiling a DMSII program that had the 
DATADICTINFO option set. This problem, which occurred only when invoking a large data base, 
has been corrected. 

P3590 BDMSCOBOL74 - "INVALID INDEX" 

A syntax error in an OPEN statement no longer causes an INVALID INDEX. 

P3 591 BDMSCOBOL74 - "DB- INVOKE" HARDLY READABLE 

Picture and Usage information in a COBOL listing with DB-INVOKE was printed in specific 
columns, making the data base information unreadable. This has been corrected. 

P3 63 5 BDMSCOBOL74 - "INVALID OP" ACCESSING GLOBAL DATA ITEMS 

When a data base was declared global in a bound-in COBOL procedure, an attempt to access global 
DM-data-i terns resulted in an INVALID OP. This no longer occurs. 

P3636 BDMSCOBOL74 - LINEAR SEARCH SELECTION EXPRESSION 

The COBOL compiler will no longer generate incorrect code (which caused an INVALID OP) when the 
following conditions are met: 

1. The data base is declared to be global. 

2. A selection expression causes a linear search. 

3. The key item referenced is accessed by other than its default character type. 
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DMS II - BUILDINQUIRY 

P3094 BUILDINQ - RENAMED "RESTART" DATA SET 

A <- re ??™,».,5 ESTART data set in a lo g ic al data base could cause a syntax error in the compilation 
ot INQUIRY. The error would occur when UPDATE was specified to BUILDINQ. This problem has 
been corrected. 

P3698 BUILDINQ - MULTIPLE BLOCKS IN "DMINQDIRECTORY" 

The manner in which BUILDINQ creates the DMINQDIRECTORY has been changed. As a result, the 
limit on the total number of combined data sets, sets and items that an INQUIRY program can 
access has been increased. 

P3706 BUILDINQ - GLOBAL DATA IN LOGICAL DATA BASE 

?«i£?i5 Q Was d y» n 8 w'th a "STRUCTURE INVOKED TWICE" error when it was run to generate an 
INQUIRY program for a logical data base that invoked global data. Now, it successfully 
generates such an INQUIRY program. 
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D3082 BUILDREORG - IMPLICIT "GENERATE" STATEMENTS 

BUILDREORG now provides additional implicit generates for certain structures. In fact, when 
UPDATE is specified to BUILDREORG, all generates are automatically provided to implement the 
changes specified in the previous DASDL UPDATE run. Thus no GENERATE statement is required. 

Certain implicit generates may be modified by explicit specification. Modifications must adhere 
to current GENERATE statement restrictions. 

1. If the UPDATE option is specified to BUILDREORG, the following implicit generates are 
provided for structures specified in DASDL as "REORGANIZE": 

A. The data set having no PRIME set specified in DASDL has the implicit generate: 

GENERATE <data set> 

B. The data set having a PRIME set specified in DASDL has the 
implicit generate: 

GENERATE <data set> ORDER BY < index str> 

<Istr> references the PRIME set. 

C. All indexing structures specified in DASDL as "REORGANIZE 
(KEYS CHANGED)" have the implicit generate: 

GENERATE <index str> 

This implicit generate cannot be modified. 

D. All indexing structures specified in DASDL as "REORGANIZE 
(KEYS SAME)" have the implicit generate 

GENERATE < index str> 

prov ided : 

1) The data set is generated. 

2) The index structure is a disjoint automatic set or disjoint automatic subset. 

3) The index structure is an unordered list or is an ordered list or index sequential 
structure with DUPLICATES allowed, but FIRST or LAST unspecified. 

All other indexing structures specified in DASDL as "REORGANIZE (KEYS SAME)" have the 
implicit generate: 

GENERATE <index str> USING <index str> 

2. If the data set is generated, the following implicit generates are provided for spanning 
index structures which are not generated as described above: 

A. All Bit-vectors and manual subsets have the implicit generate: 

GENERATE <index str> USING <index str> 

B. All automatic sets or subsets which are unordered lists or which are ordered lists or 
index sequential structures with DUPLICATES allowed, but FIRST or LAST unspecified, have 
the implicit generate 

GENERATE < index str> 

if disjoint, else 

GENERATE < index str> USING < index str> 

D3083 BUILDREORG - NEW DEFAULT FOR <SORT OPTIONS> 

If <sort options> are not specified to BUILDREORG, "SORT USING TAPES, 20000 SEGMENTS 
FAMILYNAME = <id>" is assumed. <Id> is the INTERNAL FILES family name. The INTERNAL FILES 
family name is DISK by default. 

D3084 BUILDREORG - SIMPLIFICATION OF "REORGANIZATON" 

Changes have been made to the DMSII Reorganization facility in order to achieve the following: 

1. Simplify the steps which must be performed in order to make changes to the data base 
description. 
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2. Allow the new ACCESSROUTINES and other data base system software to be compiled before or in 
conjunction with the reorganization of the data base files. 

3. Support the reentrant data base capability. 

The changes made to implement the above are briefly the following: 

1. The second DASDL UPDATE run is no longer necessary following a DASDL UPDATE with REORGANIZE 
clauses. 

2. An UPDATE option statement must be included in the specifications to BUILDREORG to effect 
format or record format conversion. 

3. The ZIP option is now set by default for a DASDL UPDATE with REORGANIZE clauses. 

4. A DASDL UPDATE no longer checks the control file for compatibility with the old description 
file. (See DASDL D-note "D3099 - INDEPENDENCE OF DASDL UPDATE COMPILATIONS" for a full 
explanat ion . ) 

5. The new description file, DESCRIPTION/<da t a base name>, is now input to the reorganization 
program to update the control file rather than the reorganization description file. 

The following paragraphs document in more detail the steps which are now required to perform 
data base reorganization and the associated changes to the reorganization facility. 

PERFORMING REORGANIZATION 



The data base administrator must decide which data base structures require reorganization. The 
data base administrator then performs as many 'reorganization runs" as necessary to achieve the 
desired resultant data base. A "reorganization run" is the performance of the following steps 
for the reorganization of at most one data set and its spanning sets. 

1. If file or record format conversion is required, a backup copy of the DASDL source and data 
base description file should be made for recovery purposes. In addition, all data base 
system software should be saved. 

2. If file or record format conversion is required, a DASDL compilation is performed specifying 
the UPDATE option, REORGANIZE clauses, and DASDL source changes. This step must be 
performed when physical attributes such as AREASIZE, BLOCKSIZE, and TABLESIZE are changed or 
record fields are added, deleted, or changed. A new description file is created which is 
marked as requiring reorganization. This description file contains both old and new formats 
and an incremented update level. 

Both user programs and data base system software may be compiled against the new description 
file; however, these programs cannot run until the reorganization of the data base is 
complete. Old user programs can run with the old ACCESSROUTINES until execution of the 
reorganization program. 

By default, DASDL ZIPs compilation of the ACCESSROUTINES and other data base system software 
when DASDL compilation is to LIBRARY or is initiated via CANDE. If the data base is to be 
used until the reorganization program is run, the ZIP option should be RESET. 

3. SYSTEM/BUILDREORG is run. This program accepts the current description file and user 
specifications as input. If file or record format conversion is required, the UPDATE option 
must be included in the specifications to BUILDREORG. (See description of UPDATE option 
below.) If format changes are not required, no UPDATE option is given. The specifications 
to BUILDREORG identify structures requiring reorganization, describe how certain 
reorganizations are to be performed, and specify available system resources. 

If no errors are encountered in the specifications, SYSTEM/BUILDREORG: 

a. Creates the reorganization description file titled "DESCRIPTION/REORGANIZATION/<da t a 
base name>" which contains the data base description and the specifications for 
reorganization. The reorganization description file is created only for the purpose of 
compiling the reorganization program. 

b. Produces a report which shows both the user and default reorganization specifications. 
All structures which will be modified by the reorganization program are listed on the 
report. 

c. ZIPs the compilation of the reorganization program unless explicitly overridden. 

The reorganization program, "REORGANIZATION/<da t a base name>", is compiled via DMAGLOL 
utilizing "DATABASE/REORGSYMBOLIC" and the reorganization description file created by 
SYSTEM/BUILDREORG. Since the reorganization program invokes the data base, the 
description file must be present for the compilation. 

4. A backup copy of the control file and all data base files should be made. If dumping the 
entire data base is not convenient, the control file and all data base structures which will 
be modified should be dumped. 
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'i . The reorganization program is run to perform the actual reorgan- ization of the data base 
files. The data base must not be in use at this time and all structures requiring 
reorganization or fixup must be available on the proper media. 

The reorganization program is run with one of three parameters: GENERATE, COPY, or REMOVE. 
The program must first be run with the GENERATE option. In GENERATE mode the reorganization 
program immediately locks the control file and marks it "in exclusive use by 
REORGANIZATION." Until this time, user programs could access the data base via the old 
ACCESSROUTINES. Now they will get OPENERRORs when they attempt to open the data base. If 
UPDATE was specified to BUILDREORG, then SYSTEM/DMCONTROL is run by the reorganization 
program to update the control file. (The new description file must be present since it is 
needed by the control file program.) The DASDL UPDATE level in the control file is 
incremented and the structure directory is updated. The reorganization program then 
reorganizes the data base structures. 

If a COPY TO intermediate medium with no COPY BACK was specified for one or more structures 
in the specifications to BUILDREORG, the reorganization program must next be run with the 
COPY option. In this mode, the program copies all such structures to their final medium. 

To complete the data base reorganization, the reorganization program is run with the REMOVE 
option. The program unlocks the control file. The new data base system software and any 
recompiled user programs can now run. Old user programs which access structures whose 
records have been reformatted and old data base system software can no longer run. 

6. A backup copy of the new control file and all data base files which were reorganized or 
fixed up should be made because of the discontinuity which was created in these files by 
their reorganization. 

In addition, if the UPDATE option was specified to BUILDREORG, the reorganization program 
should be removed since it can no longer be used. If the UPDATE option was not specified to 
BUILDREORG, the reorganization program may be saved. It can be rerun to perform the same 
reorganization until the next DASDL UPDATE occurs, at which time it must be respecified and 
recompii 1 ed. 

OPTIMIZING REORGANIZATION OF MULTIPLE DATA SETS 

Where structure or record format changes are desired on multiple data sets and/or their 
spanning sets, repetitive performance of the above steps can be optimized. The procedure is 
outlined as follows: 

A. Step 1 as described above. 

B 




prog 

for all DASDL UPDATES . 

C. Step 4 as described above. 

D. Repetitive performance of step 5 above using the description files and reorganization 
programs in the sequence of their generation. The data base must remain offline throughout 
this pirocess. User programs and data base software may be compiled in parallel with the 
reorganization runs using the last generated description file. 

E Essentially step 6 above. All reorganization programs and and all intermediate d 
files can be discarded. All data base files which were reorganized or fixed up 



cscr ipt i on 
ed up should be 



saved . 



UPDATE OPTION 



The BUILDREORG UPDATE option specifies that da *? base _. st ! u !?"f!* : ? r ?u. t 2-.^?„..f e SIim 'npnixri 

Tht 
GENERATES . 

BUILDREORG program c.nu.vn t »«a. •..■». uvov,. » v > ..... - - - - -- - . . - - , 

contains information on both old and new formats. The reorganization program checks that the 
update level in the reorganization description file is one greater than the update level in the 
control file. If this is not the case, the reorganization program aborts with the error 
message "CONTROL FILE UPDATE LEVEL MUST BE 1 LESS THAN CODE FILE i f the .^H"'"*' "!""!'"" 
was compiled against an incompatible description file, or "CONTROL FILE UPDATE LEVEL. SHOULD BE 
1 LESS THAN DESCRIPTION" if the reorganization program is run using an incompatible description 
file. 




incompatible description file. 
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CHANGES TO GENERATE STATEMENT 



When the UPDATE option is specified to BUILDREORG, the GENERATE statement is now optional. If 
the data set is REORGANIZEd in the previous DASDL compilation, then the default generate for 
the data set is "GENERATE <data set name>" and need not be given. 

Also, the syntax of the GENERATE statement has been modified so that generation of the data set 
need not be specified first. The new syntax is as follows: 

<generate statement) 

|< , I 

— GENERATE — 



/l\-<data set>- 



-<order option>- 



-<set>- 



USING — <set>- 



-<subse t >- 



USING — <subset>— 



NEW SYNTAX FOR REORGANIZATION SPECIFICATIONS 



The following is the updated syntax for specifications to BUILDREORG: 
.reorganization spec i fi cat i ons> 

-— UPDATE ; > 

|-<generate statement:*- 
-<generate statement>- 




<procedure sequence> ; 



<reorganizat ion global control) 



D3088 BUILDREORG 



"REORGANIZATION" LIMITATIONS 



Generation of an unordered list from a generated RANDOM data set is now permitted. In 
addition, the significance of other REORGANIZATION limitations, as documented in the Mark 31 
D-notes, has been minimized by providing implicit generates for certain structures where 
appropriate (see Mark 32 BUILDREORG note D3082, "Implicit GENERATE Statements"). 

D3582 BUILDREORG - INDEX CONTROL OPTION 

The syntax diagram for <index control option> in the DMSII Utilities and Operations Guide (Form 
No. 5001803) incorrectly indicates that multiple <set>s or <subset>s may be specified, 
separated by commas. Only one <set> or <subset> can actually be specified per <index control 
option>; however, multiple <index control option>s are permitted. 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 DMS II - BU I LDREORGAN I ZAT 



PAGE 2 1 3 
B6000 SERIES MARK 32 
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DMS II - COPY AUDIT 



P2956 COPYAUD-II - PRINT TAPE LABELS 

UTILITY and COPYAUDIT ..II now print tape labels via the ADM -^PRINTLABEL^echani ... 

N „:i i npI^abeira:f^!nred\r:oon ar:ne b ra^ra^o;e„ ed g (un,iUe nor«. tape, which have 

their labels printed when closed). 
P3384 COPYAUD-II - ALPHANUMERIC USERCODES 



COPYAUDIT produced spur 
with digits. COPYAUDIT 
accept data base names 
COPYAUDIT. 



clntaUing two or more hyphens. Previously these were unacceptable to 
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D3048 DASDL - ALLOW LINK TO EMBEDDED DS 

DASDL was erroneously giving a syntax error for a link to an embedded data set whose owner i « 
the same as the owner of the link. This problem has been corrected. 



Ex amp 1 e : 

D DATA SET 

( 



E DATA SET 
( 



); 
L IS IN E WITH NO PROTECTION; 

); 



The following changes should be made to the DMSII DASDL Reference Manual (Form No. 5001480): 
Add the following subparagraph to the second paragraph on Page 4-86 before the example: 

"c. Owned by <data set> containing the link." 
The first paragraph on Page 4-87 should now read as follows: 

or^: embedo^daVse^sTor C.^" '" A ^ reference the di ^° in < <*■" set>s A or X 
Subparagraph b on page 4-87 should now read as follows: 

b ' Jh. the Hi! nk re f erenc 5! ".J^J?!"' <data set>, then the link may point at any record in 
^„rH. \l .V > a . C 'i nk i eferences »n embedded <data set>, then only certain 

hv f J" th S «»■*».»?*> ">?y be referenced. The record being referenced must be owned 
rL In t d contaln ' n « th f >»»k °' by an ancestor of the record containing the link 
(An ancestor ts the owner, the owner's owner, etc.)." 

D3086 DASDL - GUARDFILES STORED UNDER USERCODE DIRECTORIES 

When guardfiles used to secure data bases and logical data bases are stored under a usercode 
2il«i2- y, r n"' US6 ^? de , muSt be includ «° i" the DASDL specification of the guard? i le t i 
Sf££! V guardfi e's usercode in DASDL will result in DMOPENERROR #26 (SECURITY ERROR ON 
OPEN) However guardfiles stored under the system directory do not require an asterisk?*) as 
part of the guardfile title specification. H asierisK < ) as 

D3099 DASDL - INDEPENDENCE OF "DASDL UPDATE" COMPILATIONS 

i i i",E"j^:.r?ft :.":i'M':jfl;.!"„Tr.;- :#&?■ a;: !i.-:s{s.'?f..tr:si.'i{ii' 

user programs and data base system software compiled against the new description file can run 
D3115 DASDL - "COBOL" RESERVED WORD TABLE UPDATED 

The 29 level COBOL reserved words tables has been replaced with the 32 level table. 
D3117 DASDL - ALLOW "PROPERTIES" LABEL EQUATION 

Is e foflowtf /PROPBRTIES fUe may "° W bC label -«1™*ed ""en a data base is compiled with DASDL, 
COMPILER FILE PROPERTIES = <alternate file>; 
D3244 DASDL - "AREASIZE" FOR DATA SETS 

M^nufl^Fnrm Nn ' %nn 1 1 nn?"" ™ 1 " 5 s P ec j fied in BL °CKS as described in the DMSII DASDL Reference 
Manual (Form No. 5001480). The example on pages 6-14 and 6-15 should read as follows: 
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Change <data set physical options>. 
ORIGINAL DASDL 



D DATA SET 

A ALPHA(IO); 
B BOOLEAN; 
N NUMBER(S5,2); 
R REAL; 

VERIFY R GEQ 0; 

S SET OF D 
KEY A; 

D 

AREAS = 10, 

AREASIZE = 500 RECORDS, 
BLOCKS I ZE = 5 RECORDS, 
CHECKSUM = FALSE 

); 

Compi le wi th DASDL. 

» UPDATE ; 
D DATA SET 

* REORGANIZE (ITEMS SAME) 

A ALPHA(IO); 
B BOOLEAN; 

* N NUMBER(S5,2) REQUIRED; 
R REAL; 

* VERIFY B OR R GEQ 0; 

S SET OF D 
KEY A; 

D 

AREAS = 10, 

* AREASIZE = 1000 RECORDS, 
BLOCKS I ZE =20 RECORDS, 

* CHECKSUM = TRUE 

); 

STEP #2 

Generate and run Reorganization. 
STEP #3 

Compile with DASDL. 

* UPDATE; 

D DATA SET 

A AL[PHA(10); 
B BOOLEAN; 

* N NUMBER(S5,2) REQUIRED; 
R REAL; 

* VERIFY B OR R GEQ 0; 

S SET OF D 

KEY A; 

D 

AREAS = 10, 

* AREASIZE = 1000 RECORDS, 
BLOCKS I ZE =20 RECORDS, 

* CHECKSUM = TRUE 

>; 
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D3316 DASDL - CRUNCH "NEWTAPE" FILE 

New symbolic files produced by DASDL will now be crunched, have a blocksize of 420 words and 
an areasize of 1008 records. 

D3441 DASDL - BETTER "CONTROLPOINT, SYNCPOINT" DEFAULTS 

DASDL will now give better defaults for SYNCPOINT and CONTROLPOINT. SYNCPOINT will default to 
100 transactions per syncpoint. CONTROLPOINT wi 1 1 default to 2 syncpoints per cont rolpoint . 

D34 53 DASDL - "28" TO "29" CONVERSION OPTIONS REMOVED 

The INITPARTITIONS option has been removed from DATABASE/WFL/COMPILEACR. Previously settinu 
the INITPARflTIONS option caused DMCONTROL to be run with the option "INITIALIZE PARTITIONS" 
DMCONTROL, in turn, ran PARTITIONCONTROL to initialize the PARTITIONINFO data set. »"««» • 

D34 5 8 DASDL - CHANGES TO "DASDL" REFERENCE MANUAL 

Page F-l of the DASDL Reference Manual should include a footnote beside the COBOL and PL/I 
representations for Real (n) and Real (n,m). 

The footnote should read as follows: 

"Real data items occupy one word and cannot be used to store normalized 12 digit numbers 
8 ^ eat £JL than 549 . 755 >8'3.887. PL/I gives a warning for real items with a precision equal to 
12. COBOL converts all real items with a precision of 12 to precision 11." 

D3558 DASDL - "FIND NEXT, FIND PRIOR" 

Page C-9 of the DASDL Reference Manual (Form No. S001S80) is incorrect. "General 
Restrictions", paragraph b, should be changed to read as follows: 

"b. FIND NEXT and FIND PRIOR are not allowed for embedded STANDARD and COMPACT data sets." 
D3 5 68 DASDL - EMPTY BLOCK LIST 

Page C-7 of the DASDL Reference Manual (Form No. 5001480) is incomplete. Compact data sets 
should be included in the list of structures using a one-way linked list to keep track of 
aval lable blocks . v 

D3621 DASDL - "LOCKTOMODIFYDETAILS " 

If a data set has the DASDL option LOCKTOMODIFYDETAILS set, INQUIRY cannot be used to create 
delete or modify any of its descendants. ' 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 



DMS II - DASDL 



P2951 DASDL - ALLOW MODULUS SPECIFICATION FOR ACCESS 

Modu.usmay now be specified for an access to a random data set via a physical specification 

statement. This statement would appear as follows. 
ACCESSNAME (MODULUS=<uns igned integer>); 

A physical specification statement for an access gave syntax errors on the 30 release and 

caused an INVALID INDEX in DASDL on the 31 release. 
P2952 DASDL - SEQUENCE NUMBER NOT UPDATED 

a:- ;s.sk -a r tsar stt: ^.r^fffii srnsztx ::«?::.% sut-'S; 

SEQNUMBER variable is now updated properly. 
P2953 DASDL - "SERIALBUFFERS" ATTRIBUTE 

Sf-j&r-aaa."^' si}-i:w:. , r*HEr ::i:i"&"wsJJSjas."'B jssra? 

specification is made. 
P2967 DASDL - "AREASZ" GREATER THAN "65536" TRUNCATED 
DASDL was inadvertently truncating AREASZ if it -greater than f 6553 6 ™ ° e P' ? ;;ir651k , ;:£e 
v a ■.ur P H, n t eS for^SZUSER^lfbelncorrect 1 on the 31 '-lease; to avoid 
problems this error will only be corrected completely on the 32 release. 

P3072 DASDL - KEYCHANGED TEXT FOR FIELD ITEM 

s*r ay::: 'Jt.:si!i; ::!:'ir?i.iK':;r.iKf n.:s: [T-A'v.r.i.'U^.xin ias 

not always produce correct results. 
P3102 DASDL - SET UP "FILEKINDF, " PACKNAME CORRECTLY 
DASDL was 'correctly setting the pacjcname and fl l.k »»d for d a{a sets sets^the^contro. file 
^uld^rroSeous.y'atslgn Ai ?!R ?£."SkKS given T. the DEFAULTS specification, if one 
existed. This problem has been corrected. 

and PACKNAME=PACK. 

i!.;,;K:i!?iST.a ,, !;;.n:-a..K..5?si-s. s. ft. :ta .r^ssr^;;; >^^ 

P3124 DASDL - SUPERFLUOUS TOO MANY AREAS MESSAGE 

DASDL will no longer produces a superfluous "NUMBER OF ROWS IS GREATER THAN 1000" error message 

when the calculated value for areas is too large. 
P3181 DASDL - BAD EXPAND TEXT FOR STORED ITEMS 

DASDL generated bad expand text for compact data set records where the stored optionally items 

btt mafk lis sjli? across a word boundary. This problem has been corrected. 

P3231 DASDL - CALCULATE REASONABLE DEFAULT " REBLOCKFACTOR " 

„„„„„ ifl ■ „„j „„ Hpmry-KFACTOR was Riven, DASDL incorrectly set REBLOCKFACTOR 

When^BLOC^was^specfied and^^REB LOC FACTOR*., j « ^ ^^ ^ REBLOCKFACTOR based on the 

BLOCKSIZE and AREASIZE. 
P3 241 DASDL - LOOP AFTER MISSPELLED UPDATE CARD 
A misspelled DASDL update card followed by a defaults specification could cause the DASDL 
compiler to loop indefinitely. This problem has been corrected. 

P3248 DASDL - CORRECT HANDLING OF "B7700" DOLLAR OPTION 
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P3315 DASDL - POSSIBLE BUFFER OVERLAY 



On a DASDL update, the DASDL compiler could inadvertently overlay a description file buffer 
when assigning set physical attributes. DASDL would then emit erroneous error messages based on 
the corrupted buffer. This problem has been corrected. 

P3342 DASDL - "BAD SELECT/VERIFY TEXT FOR FIELD BOOLEANS" 

If a boolean item within a hidden field was used in a select or verrify expression, then DASDL 
produced bad select text. This problem has been corrected. 

P3 3 79 DASDL - DISALLOW RESTARTS "DS" NAMED "RECOVERY" 

Previously, DASDL permitted restart data sets named "RECOVERY". This caused syntax errors when 
compiling RECOVERY. DASDL will now give a syntax error in this situation. 

P3 3 85 DASDL - BAD EXPANDTEXT 

DASDL was generating bad expand text for any boolean that was the first item in a stored 
depending on group. The generated replace statement had a count part equal to the boolean's 
record offset plus one. This problem has been corrected. 

P3 386 DASDL - "MOVES LIST EXCEEDED" ERROR 

While generating ALGOL REORG move text for DASDL reorganization, the DASDL compiler could fill 
up a compile time move table and emit the error message "MOVES LIST EXCEEDED". This problem has 
been corrected by allowing DASDL to resize this table when it becomes full. 

P3442 DASDL - ERRONEOUS INITIAL VALUES FOR REMAP 

Due to an error in DASDL, an initial value specification in a remap could be carried over to 
subsequent remaps of the same data set. This problem has been corrected. 

P34 87 DASDL - "EOF NO LABEL" ERROR 

? P T eC JL f ji ng a rema P item which was not in the data set caused DASDL to give the error "ITEM NOT 
IN DATASET Due to poor error recovery, an "EOF NO LABEL" error could subsequently occur on 
Propfile. This no longer occurs. 

P3 699 DASDL - DISALLOW REORGANIZATION ACROSS RELEASES 

Since the REORGANIZATION program cannot handle description files from earlier releases DASDL 
updates from one release to another cannot include REORGANIZATION. The DASDL compiler now 
gives an error message when an attempt is made to perform a reorganization across releases. 

P3700 DASDL - IDENTIFIERS ENDING WITH A HYPHEN 

DASDL now ensures that identifiers do not end with a hyphen. 

P3756 DASDL - "BLOCKSIZE TOO SMALL" FAULT 



If the blocksize in 
a syntax 



locksize in a variable format data set is too small, the DASDL compiler correctly gives 
error, and then fails with a DIVIDE BY ZERO fault. This problem has been corrected. 

P37 5 8 DASDL - CREATION OF DATA BASE UNDER "•" DIRECTORY 

DASDL currently allows the user to create a description file under the system directory using 
the following statement: 

* <data base name> WITH DASDL LIBRARY. 

However, the files created by SYSTEM/DMCONTROL and DATABASE/WFL/COMPILEACR were previously put 
™iV, usercode of the DASDL compilation. This has been corrected. The control file and 

DMSll system software will now be put under the system directory provided the DASDL compilation 
is done under a privileged usercode. 

P3790 DASDL - LIMIT ERROR ON RESTART DATA SET 

DASDL failed to allocate enough space for restart data sets with small populations or small 
1»™Z s,ze ?- The f >rst attempt to store into the restart data set would result in a LIMIT 
faRKOR exception. DASDL now allocates one extra block for the restart data set because block 
zero is never used to store restart records. 

P3 7 93 DASDL - AVERAGE RECORD SIZE DURING UPDATE 

DASDL now ensures that average record size is not changed for simple update. Average record 
size may only be changed when REORGAN I ZE ( I TEMS CHANGED) or REORGAN I ZE ( I TEMS SAME) is Specified. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - DBANALYZER 

D3369 DBANALYZER - "DBANALYZER" IMPLEMENTATION 

INTRODUCTION 



important implications in the areas of: 

Data Base Design 

Data Base Modification 

Data Base Tuning 

Data Base Reorganization 

DBANALYZER P-vides a convenient method by which a D-t. "... ^^-rator ^-n^coll ... 
information concerning » DMSII dat » ™ se ■ ln ? oah d t re „ort this by data base structure. 
DBANALYZER* ^^^"producrc m P ?Le„^ "to^tne^unlttme dynamic analysis provided by the DMSII 
S?ATISTICS option il that DBANALYZER provides static analysis of the data base files. 

i .« «„., nucii diti, h>«e nrovidina the data base description and 
DBANALYZER may be used o ana */e any DMSII dMa ba s e P™^^*^ DMsn data base description 

ft.^and „s:s a that S info;m:Uon e .o V provia:an intelligent analysis of each structure, depending 
on the structure's characteristics. 
DBANALYZER provides the following information: 

A. Structure Identification 

This includes the structure's name, number, type, relation to other structures, and DASDL 
comment . 

B. Dependent Structures 

All sets of each data set are listed. 

C. Fi le Attributes 

Physical File attributes of the file are provided. 

D. DASDL Attributes 

DBANALYZER lists structure attributes from the DMSII description file concerning how the 
ACCESSROUTINES reference the file. 

All DASDL generated source statements which are included in the ACCESSROUTINES are extracted 
from the description file and printed. 

F. Fi le Analysis 

provided. The extent of the analysis performed can be controlled by the user. 

G. Analysis Time 

A summary of the processor, I/O and elapsed time required to perform the analysis is 

produced for each structure. 

normally provided at the file level by the MCP. 

COMPILING DBANALYZER 
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The following procedure can be used to compile DBANALYZER. 

A. Copy and compare SYMBOL/DBANALYZER and DATABASE/PROPERTIES to disk from the DMSII system 
tape. J 

B. Compile SYSTEM/DBANALYZER using the following WFL statements. 

<i> BEGIN JOB COMPILEDBANALYZER; 

COMPILE SYSTEM/DBANALYZER WITH DMALGOL LIBRARY 

COMPILER FILE TAPE (TITLE=SYMBOL/DBANALYZER) ; ' 

COMPILER DATA 

$ SET MERGE LINEINFO 

$ RESET LIST XREF 
<i> END JOB 

RUNNING DBANALYZER 



DBANALYZER can be run interactively at a terminal using CANDE or as a batch job through WFL. 

INTERACTIVE MODE 



To run DBANALYZER in interactive mode, first log on to CANDE and then type: 

RUN $ SYSTEM/DBANALYZER; 

FILE DASDL(TITLE=DESCRIPTION/<data basename>ON<packname>) ; 

DBANALYZER reads and interprets the DASDL description file; therefore, this file must be 
equated to the current description file for the data base. 

In interactive mode, all input commands are entered at the terminal. Each command is executed 
when it is entered. 

DBANALYZER displays a # each time it is ready for additional input. Normally, commands can be 
entered on a single line; however, some commands may exceed the width of the terminal A* 
character, entered at the end of the line, indicates that more input will follow When the 
line is transmitted, DBANALYZER responds with # and additional input may be entered This 
process may be repeated as many times as necessary. When the command is complete, the last 
line can be transmitted without a % and the entire command is executed. Several commands may 
be contained in a single input message provided each command is followed by a semicolon. 

Output is normally displayed at the terminal. However, by using the OPTION command, output may 
be directed to either the terminal or the printer. When a terminal page length greater than 
zero is specified, DBANALYZER displays a full page of output and then waits for a message 
-ontaining one or more blanks to be input, before transmitting the next page. If a non-blank 

naracter is transmitted, all remaining output is discarded. DBANALYZER displays a # and then 

waits a new input command. 



c 
c 
awa 



BATCH MODE 

To run DBANALYZER in batch mode, a card deck or JOBSYMBOL file must be made containing WFL 
statements similar to those below: 

<i>BEGIN JOB DBANALYZER; 
RUN SYSTEM/DBANALYZER; 

FILE DASDL (TITLE=DESCRIPTION/<da t a basename>on<packname> ) • 
DATA CARD 

<one or more DBANALYZER input commands) 
<i>END JOB 

DBANALYZER reads and interprets the DASDL description file; therefore, this file must be 
equated to the current description file for the data base. 

By default, input commands are expected to be in a card file with internal name CARD This 
file may be equated to a disk file using WFL file equation. When DBANALYZER commands are 
entered from cards or disk, only the first 72 charaters of each record may contain commands 
ihe remaining columns are reserved for sequence numbers or comments. A command may extend over 
as many records as desired; however, no word may be split between two records. Every command 
must be terminated with a semicolon. Several commands may be contained on a single input 
record provided each is delimited by a semicolon. F 

A percent sign (%) in the input denotes a comment. Anything between the percent sign and the 
as "ABC%DEV eC " ' gn0red < exce P t when the percent sign is enclosed in quotation marks such 

In batch mode, DBANALYZER output is sent to a printer file with the internal name LINE. 

COMMON SYNTACTIC ITEMS 
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< 1 e 1 1 e r > 

— one of the EBCDIC characters, A through Z - 

<digi t> 

— one of the decimal digits, through 9 — | 

< int eger> 

<digi t> | 



Semant ics 

<integer>s are used to represent unsigned whole value! 

< ident i f i er> 

I 

— <let ter>- 



/ 1 5\ < 1 e 1 1 e r > --< 1 e 1 1 e r > 



-<digi t> — 



-<digi t>- 



Semant ics 

<ident if ier>s have no intrinsic meaning, 
structures within a DMSII data base. 



They are used to represent symbolic names of 



,osed of from 1-17 <letter> S , <digit>s and hyphens. The first character 



An <ridentifier> is composed ot t rom l-i/ <ienei>», ^u.».w» 
must be a <letter>. The last character must not be a hyphen. 



mu 

Exampl es 

A 

EMPLOYEE 

ACCOUNTS -PAYABLE 
B-l 

<st r ing> 

I < 

» any EBCDIC character except quote 



Semant i cs 

<string>s must be contained within quotes. A string 

DBANALYZER COMMANDS 



ng can contain at most 255 characters. 



Syntax 
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•cdbanalyzer commands > 

I < . 

-<analyze command)-- 

-<help command) 

-<option command) 

-<printer command) — 

-<quit command) 

-<terminal command)- 



S email t i cs 
ANALYZE 



Causes DBANALYZER to analyze one or more data base structures and display the 
results of the analysis. F } 



HELP 

OPTION 

PRINTER 

QUIT 

TERMINAL 

ANALYZE Command 

Syntax 

<analyze command) 

— ANALYZE DATABASE 

ALL 



Displays the syntax and semantics for DBANALYZER input commands. 

Allows the current output device to be displayed or altered. 

Allows the attributes of the line printer file to be displayed or altered. 

Terminates the DBANALYZER program. 

Allows the attributes of the terminal file to be displayed or altered. 



(Structure 1 i s t >— | |-<analyze options>- 



<s t rue ture list) 

I <• j 

-<s t rue ture name) 

|- .<partition name) 

-<s true ture number) 

|- -<partition name) — 
(structure number) - (structure number) - 
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<analyze options> 



( OPTIONS = 



ALL 
DASDL - 






ATTRIBUTES 



DATA 
FILE 



ATTRIBUTES 



- SETS 

- STRUCTURE 

- TABLE 

- TEXT 

- TIME 



Semant i cs 

nniij»iv7VB tr. nnalvze one or more data base structures and display 
The ANALYZE command causes DBANALYZER to analyze one or 

the results of the analysis. 



ANALYZE DATABASE 



NALYZE DATABASE displays data base at « r ibut es inc luding t ^of ...» , § 1 evel s , ^-stamps, 
«"l«"i. s?ruc?ure number'* name! and type for each valid structure. 



ANALYZE 

P 



ANALYZE <structure list> 




ANALYZE ALL 

When ALL is sp 



ecified, analysis is performed on the data base and on all valid structures. 



<Analyze Options> 

analyze o P tions> control which forms of analysis are performed. ALL is assumed by default 
when no <analyze options> appear. 



ALL 



ALL causes complete analysis to occur. 



DASDL ATTRIBUTES 



i.„t»H nAsni aliened structure attributes are listed from th 
fh e e:e ed at?ributer S vary d slightly according to the structure type, bu 



When this option is se 

description file. T . 

include all of the following which are appropriate. 



the 
t 
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Acces ses 

-Modulus 



Data Sets 

-Allocate -Open Partitions 

-Areas -Opt ions 

-Areasize -Population 

-Blocksize -Reblockfactor 

-Buffers -Recordsize 

-Modulus -Subblocks ize 

Sets and Subsets 

-Areas -Modulus 

-Areasize -Open Partitions 

-Buffers -Options 

-Key Data Size -Population 

-Key Entry Size 

-Key Size -Tablesize 

-Loadf ac tor 



DATA 



^i^i,™?" ' y meanin g ful for data sets. When the DATA option is specified, more detailed 
STRUCTURE analysis is performed. Generally, this option causes the entire structure to be 
read and analyzed. 

FILE ATTRIBUTES 

When this option is selected, the physical attributes of the file associated with the 
structure are listed. These attributes include: 

-Title 

-Format time stamp 
-Version time stamp 
-Creation date 
-Access date 
-Areas 
-Areas i ze 
-Blocks i ze 
-Records i ze 
-Last record 

SETS 

SETS is only meaningful for data sets. When SETS is specified, DBANALYZER lists all sets 
subsets, and accesses which reference the data set. 

STRUCTURE 

When STRUCTURE is specified, the contents of data base structures are analyzed. The depth 
of analysis performed is controlled by the DATA option for data sets and the TABLE option 
for index sets. Normally when these options are reset, only control information is 
examined; otherwise, the entire structure is read and analyzed. 

The analysis performed depends upon the structure type. Complete analysis generally 
produces the following information: 

DATA SETS 

-File size 

-Bl ock Ut i 1 i zat ion 

-Data block analysis including available space, 

control information, and data. 
-Structure control information 

INDEX SETS 

-File size 

-Block ut i 1 i zat ion 

-Table block analysis including available space, 

control information, and table entries. 
-Bias relative to the referred data set 
-Structure control information 

TABLE 

l™}£J™T= only meanin 8f ul fo i 'ndex sets. When the TABLE option is specified, more detailed 
hlKUCTURE analysis is performed. Generally, this option causes the entire structure to be 
read and analyzed. 



TEXT 



*£££ e lB^?rrlx,i 3 c pecified * al ' DASDL generated source statements which are included in the 
ACCESSROUTINES are extracted from the description file and printed. 
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TIME 



When TIME is specified, the processor, I/O, and elapsed 
structure are reported. 

Ex amp 1 es 

ANALYZE ALL 

ANALYZE D, S, E.1977, E. 197 8(OPTIONS=DASDL, FILE, TEXT) 

ANALYZE D, 10-17, 19 
HELP Command 
Syntax 

<help command) 
HELP — 

-<dbanalyzer command>- 
-<metal ingui s t ic id>- 



time required to analyze each 



Semant i cs 

HELP displays information about DBANALYZER input commands 

When HELP alone is entered, the DBANALYZER commands are listed. 

When HELP <dbanalyzer command> is entered, the syntax of the specified command is listed. 

HELP metalinguistic id> causes the syntax of the selected metalanguage identifier to be 

di spl ayed . 

Ex amp 1 es 

HELP 

HELP ANALYZE 

HELP (structure list> 

OPTION Command 

Synt ax 

<option command> 

OPTION 

PRINTER — 

TERMINAL - 



Semant i cs 

When OPTION alone is entered, the current options are displayed. 

OPTION TERMINAL causes output to be listed on the terminal. 

Ex amp 1 e 

OPTION PRINTER 
PRINTER Command 
Syntax 
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<printer coram an d> 
— PRINTER 



PAGE <integer>- 



- WIDTH <integer>- 



Semant ics 

PRINTER displays or alters the current printer attributes. 

When PRINTER alone is entered, the current printer attributes are displayed. 

PAGE specifies the number of lines displayed per page. 

WIDTH specifies the number of characters displayed on each line. 

The printer attributes are only significant when OPTION PRINTER is set (see the OPTION 
command) . 

Ex amp 1 e 

PRINTER WIDTH=132, PAGE=50 

QUIT Command 

Syntax 

<qui t command) 

— __ QUIT --— | 

- BYE - 

- END - 

- STOP 



Semant i cs 

QUIT terminates the DBANALYZER program. 
Ex amp 1 e 
QUIT 

TERMINAL Command 

Syntax 

.(terminal command) 

— TERMINAL 



PAGE <integer>- 



WIDTH <integer ; 



Semant i cs 

TERMINAL displays or alters the current terminal attributes. 

When TERMINAL alone is entered, the current terminal attributes are displayed. 
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PAGE specifies the number of lines displayed per page If PAGE «•!"■{" ^° s z f °™ a 

rtRANAIYZER muses after displaying each full page of output. DBANALYZER then waits tor a 

me^IfoSuSinlng one or more'blankf to be input before transmitting % next page If a 

nan-blank character is transmitted, all remaining output is discarded, DBANALYZER displays a 

T, and then awaits a new tnput command. If PAGE is zero, then output is not broken into 

pages . 

WIDTH controls the number of characters displayed on each line. 

The terminal attributes are only significant when OPTION TERMINAL is set (see the OPTION 

command) . 

Example 

TERMINAL WIDTH=80,PAGE=23 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - DMALGOL 



D3049 DMALGOL - "DMALGOL" EXTENSIONS FOR "DMINQ" 

Extensions have been made to the DM INQUIRY functions described in Mark 31 P and D Notes 
Appendix E, "DMALGOL Implementation". See Appendix A, "DMALGOL Implementation", for a 
description of the 32 extensions, which are indicated by PCN bars in the right margin. 

D3634 DMALGOL - "NODE <IDENTIFIER> *" DEIMPLEMENTED 

The NODE <identifier> * construct was de impl ement ed on the Mark 30 release; consequently, the 
Mark 31 appendix for DMALGOL has been revised. See Mark 32 Appendix A, "DMALGOL 
Implementation", for details. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - DMALGOL 



P3009 DMALGOL - CORRECT '"ERROR" CONSTRUCT 

A SEG ARRAY error occurred during compilation of the DMALGOL construct 'ERROR. The following 
is an example of a program which would evoke this error. 

Ex amp 1 e : 

BEGIN 

•ERROR "ANY STRING" 
END. 

This problem has been corrected. 

P3323 DMALGOL - ELIMINATE EXTRANEOUS "?"S FOR "'PRINT" 

Formerly, the 'PRINT construct in DMALGOL would cause question marks to be printed surrounding 
the desired text output. This problem has been corrected. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - DMCONTROL 



D3100 DMCTL - UPDATE LEVEL CHECK FOR "RECOVER UPDATE" 

A check i s now performed for "RECOVER UPDATE" to ensure that the description file and the old 
control file have compatible update levels. If the description file is marked as requiring 
reorganization, the update levels must be identical. If the description file is not marked as 
requiring reorganization, then the update level of the old control file must be the same as or 
one less than the description file update level. If update levels are not compatible, the 
error message "GIVEN CONTROL FILE TOO OLD FOR PROPER CONTROL FILE RECOVERY" is printed and the 
"RECOVER UPDATE" is not allowed. When this occurs and a proper control file is not available, 
"RECOVER INITIALIZE" must be used to recover the control file. 

D3101 DMCTL - AVOIDANCE OF "RECOVER INITIALIZE" 

Recovery of the control file via the DMCONTROL "RECOVER INITIALIZE" function should be the 
recovery method of last resort. "RECOVER UPDATE" is the preferred method. A "RECOVER 
INITIALIZE" invalidates all existing dump tapes and subverts all data base coordination checks. 

D3119 DMCTL - "28" TO "29" CONVERSION OPTIONS REMOVED 

The following options, which permitted conversion from the Mark 28 to the Mark 29 DMSII 
software release, have been de-implemented: 

INITIALIZE 29 
INITIALIZE PARTITIONS 
INITIALIZE PARTITIONS 29 
CORRECT PARTITIONS 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - DMCONTROL 

P275 8 DMCTL - SYSTEM IDENTIFICATION 

DMCONTROL now places the appropriate system identification in its printer heading. 
P3108 DMCTL - "DMCONTROL" RESEQUENCED 

The DMCONTROL symbolic has been resequenced. 
P3175 DMCTL - CONTROL FILE "I/O" LOCK 

A lock has been added to the control file module to enforce single-threaded I/O operation 
against the data base control file. 

P3182 DMCTL - "CFDELETEPART" CORRUPTING CONTROL FILE 

CFDELETEPART was directly altering the contents of the control file I/O buffer, potentially 
leading to corruption of the control file. The situation has been corrected. 

P3185 DMCTL - INITIAL VALUE OF DESIGNATED SERIAL NUMBERS 

Data bases that audit to tape using designated serial numbers were not using the initial value 
for serial numbers specified in the DASDL source. For example, the first audit file open would 
request a tape with SERIALNO= "AUD001 " , even though the starting serial number was specified as 
"AUDOOO" in the DASDL source. The problem has been corrected. 

P3249 DMCTL - MARK "32 DMS" ON MARK "31 MCP" 

Data management software that includes the Mark 32 control file module from DATABASE/DMCONTROL 
can run under a Mark 31 MCP; however, the DMSII software must be compiled with a Mark 32 
DMALGOL compiler, and any attempted data base equation will be ignored. 

P3269 DMCTL - INVALID INDEX ON "OVERRIDE HL" 

The DMCONTROL function "OVERRIDE HL" could result in an INVALID INDEX if an error occurred 
while trying to open the control file. This problem has been corrected. 

P3285 DMCTL - "CF" TITLE FOR "OVERRIDE HL" 

The SYSTEM/DMCONTROL function OVERRIDE HL now constructs a title for the data base control file 
from the description file if the control file title was not equated at run time. 

This change permits all SYSTEM/DMCONTROL functions to work by equating the description file. 
Previously, the control file was equated for "OVERRIDE HL" and the description file was equated 
for all other functions. OVERRIDE HL wi 1 1 continue to work as before if the control tile is 
equated . 

P3316 DMCTL - REDUCE USE OF "REORGINFONODE" 

Only the format time stamp is now taken from reorginf onode during a control file update for 
reorganization. Previously all structure attributes were taken from reorginfonode . 

P3317 DMCTL - SET UP PREFIX ARRAYS 

The control file module now sets up the control file name and prefix arrays only ,rj"en they have 
not been previously set up. Prior to this, these arrays were setup every time CFOPEN was 
cal led. 

P3343 DMCTL - STRUCTURE DETAILS 

Structure records in the control file now contain the TYPEF (data set or index set) and 
SUBTYPEF (standard, index sequential, etc.) properties and the file format level number of each 
structure. The utility WRITE/LIST function will print the format level of each structure. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - MONITOR 



D3378 MONITOR - DATA BASE MONITORING FACILITY 

DATABASE MONITORING FACILITY 



MONITOR is an interactive program which allows access to data base status and statistics and 
permits changes to data base options and parameters. In addition, data base information may be 
sampled and captured in a disk file for later off-line analysis. 

Capabi 1 i t i es 

1. Any Visible DBS message that would normally be input from the console may be input to the 
MONITOR; the response is returned to the remote terminal. 

2. An automatic display mode (ADM) similar to that available for the Operator Display Terminals 
(ODT's) may be used to constantly display the data base status and statistics. 

3. If the data base has the STATISTICS option set, this information may also be included in the 
MONITOR reponses. 

4. Output may be displayed on either a screen or hardcopy terminal. Terminal specifications 
may be modified via commands to the MONITOR. 

5. Data base status and statistics may be captured in a disk file for the entire data base or 
selected structures. This sampling can be turned on and off via MONITOR during the course of 
a sess ion . 

6. A help facility is provided which describes the syntax for all MONITOR commands. 
Generat ion 



MONITOR may be compiled using the DATABASE/WFL/COMPILEACR job file. When compiling MONITOR, 
the dollar option "NOUPDATE" may be set to generate a version of MONITOR which allows inquiry 
into data base status and statistics information but does not allow any data base parameters or 
options to be changed. The symbol file for MONITOR is called DATABASE/MONITOR. 

Opera t i on 



MONITOR may be run via CANDE. MONITOR has no parameters. MONITOR opens the data base inquiry 
so that it may use the INQUIRY interface to access data base information. Thus, data base 
statistics and status information reflect MONITOR as an inquiry user of the data base. 

Commands 



1. Any of the Visible DBS commands may be typed in at any time and the response is displayed on 
the remote terminal. The current Visible DBS commands begin with the following key words. 



STATUS 

ALLOWEDCORE 

SYNCPOINT 

CONTROLPOINT 

STATISTICS 

STRUCTURE 

AUDIT 



The ALLOWEDCORE, SYNCPOINT, CONTROLPOINT, STATISTICS, STRUCTURE, and AUDIT commands 
prohibited if NOUPDATE is specified at compile time. 

2. The DISPLAY command allows information to be displayed on the remote terminal. 
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<display command> 

— DISPLAY — <di splay type> 



<display type> 

STATUS 

- MESSAGES — 
STATISTICS 



-<s tat s select ion>- 



<s t at s select ion> 

DATABASE 

- STRUCTURES — <structure list>- 



<s t rue t lire 1 i s t > 

ALL 

I < , 

( <structure name> 

|-<structure number>- 



) - 



STATUS returns information similar to the Visible DBS command STATUS including number of 
inquiry and update users, etc, but in a form that is more suitable for the ADM. 

MESSAGES displays up to 24 of the most recent ACCESSROUTINES messages. They do not include 
normal program display messages. 

STATISTICS can only be used when the STATISTICS option is set for the data base. 

STATISTICS DATABASE displays data base level statistics. If the data base is audited, audit 
and transaction statistics are included. 

STATISTICS STRUCTURES displays statistics concerning the selected structures. This includes 
the number of reads, writes, random users, serial users, small buffers, big buffers, etc. 

STATISTICS by itself displays summary statistics for all structures. This includes the total 
reads and total writes against the data base. 

To obtain most of this information from the MONITOR, the data base must have been compiled 
with the STATISTICS option. 

3. The ADM command allows constant display of information on the remote terminal. 

— ADM 

1 <- 

( — <display options> — ) 

| -<delay>- 

STOP 
GO 




<display options> 

I < — , — <number> 
<display type> - 



<number> 
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<de 1 ay> 



-<number> — 



DELAY 



Pages may contain one or more types of information. <display options> control how many 
lines are displayed for each type of information. If two or more pages are specified, they 
are displayed alternately. For example, ADM (STATUS) (MESSAGES) displays a page with the 
current data base status, delays 10 seconds, and then displays a page containing messages. 

ADM by itself lists the current ADM specification. 

ADM STOP or ADM GO suspends or resumes automatic display. 

ADM - cancels the current ADM specifications and restores the default. The ADM is left 
suspended . 

4. TERM alters or displays the remote terminal specifications. 

— TERM ■ I 



LINES - 
WIDTH - 
FIRST - 

- SCREEN 

- HARDCOPY — 

- TD820 

- TD8 30 



-<number> 



LINES specifies the number of lines on the device. (Default = 24.) 

WIDTH specifies the device width in characters. (Default = 80.) 

FIRST specifies the line at which display is to begin. (Default = 2.) 

SCREEN, HARDCOPY, TD820 and TD830 indicate the type of the remote device. By default, the 

device type is SCREEN if the station is marked such in the NDL specification and HARDCOPY 

otherwise. Specifying TD820 or TD830 causes MONITOR to take advantage of the highlighting 
features of these terminals. 

S. The CAPTURE command allows statistics information to be captured for the entire data base or 
for selected structures. 

(capture command) 

— CAPTURE -> 



-<stats selection>- 



|-<capture options>- 



-<de 1 ay > — 



<capture options) 

I < I 

FILE — <filename> — 



CAPTURE with no qualification causes all statistics information to be captured and stored in 
a disk file called <data base name>/MONITORSTATS/LSN< 1 sn>/<da t e-t ime>/<seq . no . > . <lsn> is 
the logical station number of the terminal originating the MONITOR. <seq.no.> is a sequence 
number that starts as 001 and increments by 1 for each file created during a particular 
capture session. If a structure list is specified, only statistics for the given structures 
are captured. If the FILE clause is used, the statistics file is created under that name 
followed by a sequence number. 
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capture: 



B6000 SERIES MARK 32 
causes sampling to be terminated. 



The disk file created is a FILETYPE 4 disk file with the first word of each record being the 
size of the record. The second word is a TIME(6) value of the time the statistics record was 
written. The rest of the record is the result of the statistics request from the 
ACCESSROUTINES. This format is defined in ACR note D3045 - Statistics Interface. The 
internal name for the CAPTURE file is CAPTUREFILE. 

HELP displays the syntax and semantics of MONITOR commands. 

— HELP I 

- <Monitor command) 

- <metal ingui s t ic id> - 

HELP by itself displays all MONITOR commands. 

HELP <Monitor command> displays the syntax and a short explanation of the specified command. 

HELP <metal ingui t ic id> displays the syntax and a short explanation of the specified 
metalinguistic identifier. For example, "HELP <structure 1 i s t > " . 

END or its synonyms terminate the MONITOR. 

END — — I 

BYE — 
STOP - 
QUIT - 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - DUMPDIR 



D3353 DUMPDIR - "DUMPDIR" ENHANCEMENTS 

PURPOSE 



Mark 32 SYSTEM/DMDUMPDIR provides more automatic data base recovery. This will be referred to 
as automatic tape recovery. 

Previously, to recover a data base from dump tapes, UTILITY required a list of the dump tapes 
to be utilized. UTILITY now relieves the user of this task by using the SYSTEM/DMDUMPDIR 
library to determine which dumps are needed. 

AUTOMATIC TAPE RECOVERY 
Restrictions on Usage 



Recoils t rue t . 

All forms of reconstruct can use the Dump Directory. 
Rebui Id. 

This feature can be used for two of the three types of rebuild: 

1. Where a <date-time point> is given for the ending point, 

2. Where THRU AUDIT is specified and the most current dumps are used. 

Rebuild to <boj/eoj point;, cannot use the Dump Directory because this does not provide the 
recovery ending point time. 

Usage Considerations 

When a rebuild or rollback is done, dumps may be invalidated. 

| [dump dl] — | — [dump d2] | 

(time) tO tl t2 

If a data base that is at t2 in time is rebuilt or rolledback to tl, dump d2 is no longer 
valid. 

When RECOVERY has finished, it will delete dumps which are no longer valid. 

If any type of manual recovery is done that will make invalid dumps valid or valid dumps 
invalid, these dumps must be manually added or deleted from the Dump Directory using 
SYSTEM/DMDUMPDIR. 

UTILITY Syntax 

Automatic tape recovery is assumed if no <sourcelist> is given, the Dump Directory system has 
been enabled and all restrictions on usage are meet. 

If THRU AUDIT is specified, FROM MOST CURRENT must be specified in place of a <source!ist> for 
automatic tape recovery to occur. 

RECOVERY OF DUMP DIRECTORY FILES 



If the Main Directory file is lost, it can be recovered by 

1. ENABLE ing the Dump Directory System, causing a new Main Directory file with no Dump 
Directory entries to be built. 

2. Dump directory entries for existing Dump Directory files may then be ADDed to the Main 
Di rectory . 

If Dump Directory files are lost, they can be recovered by using UTILITY to recreate them from 
UTILITY dump tapes. Dump Directory entries are automatically put into the Main Directory by 
this f unc t ion . 

UTILITY syntax. 
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The following syntax rebuilds a Dump Directory file and inserts a Dump Directory entry in the 
Main Directory from each UTILITY dump tape specified in <tapelist>. 



BU I LDDUMPD I RECTORY 
< tape 1 i s t> 



< tapel i s t> 



<tape name> 



-(— — /1\ — VERSION = <integer> 

-/1\— CYCLE = <integer> 

-/1\ — SERIALNO = — <integer> 
|- <string6> 



)- 



The version, cycle and serialno of the last reel made by the UTILITY dump should be given; 
otherwise, when automatic tape recovery is done: 

1. More reels of the dump than nescessary may have to be processed to load the desired rows 

2. The list of the tapes needed to load the desired rows may not contain every cycle and 
version of the tape that will be needed. 
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DMS II 



DUMPDIR 



P3 372 DUMPDIR - DESCRIPTION FILE TITLE 

When DUMPDIR is run without a usercode with a non-usercode description file, the message 
"DESCRIPTION FILE TITLE MUST BE IN THE FORMAT" was erroneously displayed. This problem has 
been corrected. This failure was most likely to occur when DUMPDIR was run from the ODT 
consol e . 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 

DMS II - DUMPDIR/LIBRARY 

P3488 DUMPDIRLIB - "RETAIN" CORRECTED 

RETAIN was keeping the oldest dumps rather than the newest. This problem has been corrected. 

P3489 DUMPDIRLIB - ERROR USING "WRITE=/LIST=" 

Data bases containing remaps or accesses failed with a SEG ARRAY error when WRITE= or LIST= was 
used. This no longer occurs. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - INQUIRY 



D3171 INQ - "INQ CREATE/DELETE" 

Simple record creation and deletion is now provided in INQUIRY. This new capability along with 
the present query, reporting, and update capabilities in INQUIRY provides a completely 
"programmerless" user interface to DMSII. For a simple data base application, INQUIRY may be 
all that is neccessary to create, update, and utilize the data base. 

Record creation, deletion, and update in INQUIRY does not provide for the maintenance of links 
and manual subsets. These must be maintained programmat ical ly if they exist in the data base. 

For audited data bases, an INQUIRY create, delete, or update operation is done as a single 
transaction with a sync-point forced on the ENDTRANSACTION. This prevents suspension of 
application programs due to terminal "think time." In addition, it guarantees that if there are 
no errors during the transaction, the modification to the data base occurs and is not backed 
out if some program aborts or a Halt/Load occurs. If any errors are encountered, the user is 
notified and the modification to the data base is not done. 

CREATE STATEMENT 



Syntax : 

— CREATE — <create specification — | 

<create spec i fi cat i on> 

-<create 1 i s t > — | 

-<data set name> 

|- ( <record typo ) -| |- WITH 



<create 1 i s t > 

I < > 

-<alpha item> — = — <string> 

-(arithmetic item> — = — (arithmetic expression;.- 
-(boolean item> — = TRUE 

- FALSE 



Examples : 

CREATE Bl = "ABC", B2 = 500, B3 = TRUE 

CREATE X WITH XI = 34 

CREATE VAR-FMT-DATASET(3) WITH COMMON- VAR = 1, VAR-3 = 10 

Semant i cs : 

CREATE adds a record to the data set. For embedded data sets, a record of the master data set 
must be currently selected. A CREATE causes any selection on the data set, itself, and any of 
its embedded data sets to be discontinued. After a successful CREATE, the currently selected 
record for the data set is the created record. 

(Data set name> explicitly names the data set for which a record is to be created. If not 
specified, the data set is determined from the items referenced in the (create list>. 

(Record typo is a positive (integer> which must specify the record type for a data set with 
variable format records. 

Each item named in the (create list> is assigned the appropriate value. All items assigned a 
value must belong to the same data set. Variables used in the (arithmetic expression> must 
reference values in currently selected records of other data sets. Items of the data set 
record which are not assigned values in the (create list> are initialized to the following 
va I ues : 
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1. DASDL declared INITIALVALUE if present, or 

2. DASDL declared NULL if present, or 

3. Default NULL. 

The following items cannot be specified in the <oreate list>: 

a. Count items 

b . Li nk i terns 

c. Population items 

d. Record type items 

e. Items specified as READONLY 

Pragma t i cs : 

CREATE invokes the data base accessrout ines . Any violations of the normal DMSII restrictions 
related to the create/store function will cause an error condition, and an error message will 
be displayed. If an error condition is detected, the record is not created. 

Creations made to an audited data base are audited in the normal DMSII manner. 

DELETE STATEMENT 



Syntax : 

— DELETE — <data set name>- 

Ex amp 1 e : 



SELECT C 

# 

DISPLAY ALL 

CI = 95 

C2 = X 
DEL C 
# 

Semant ics : 

DELETE removes the currently selected record from the data set. After a successful DELETE, the 
currently selected record for the data set remains the deleted record (e.g., items from this 
record may still be displayed). 

If a record has not been selected for the data set, then an error message is displayed and no 
deletion is performed. 

Pragma t ics: 

DELETE invokes the data base accessrout ines . Any violations of the normal DMSII restrictions 
related to the delete function will cause an error condition, and an error message will be 
displayed. If an error condition is detected, deletion is not performed. 

Deletions made to an audited data base are audited in the normal DMSII manner. 

UPDATE STATEMENT 



The syntax and semantics of the UPDATE statement have not changed. It should be noted, 
however, that variables used in an arithmetic expression> in the <update list> always 
reference current values in the data set record being updated or reference values in currently 
selected records of other data sets. 

Ex amp 1 e : 

UPDATE X1=X1+10, X2=X1 

If the value of XI is 10 in the currently selected record of data set X, the value of XI is 20 
and the value of X2 is 10 in the updated record. 

SET STATEMENT ADDITION 



Syntax : 

The following option has been added to the SET statement: 

— CREATE <create speci f i cat ion> | 

- NONE 
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Exampl e : 

SET O-P-DATA TO CREATE 0-P-ORDNUM=0-ORDNUM , 0-P-PARTNUM= 1 23 

Seman t i cs : 

SET CREATE modifies or eliminates the create text for the data set. 

RECALL STATEMENT ADDITION 
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Syntax : 

The following option has been added to the RECALL statement: 

— <date set name> — CREATE — | 

Exampl e : 

RECALL X CREATE 

Seman t i cs : 

If <data set name> CREATE is specified, INQUIRY loads and displays the <text> of any CREATE 
statement associated with the data set. 

CHANGES TO BUILDINQ FOR RECORD CREATION AND DELETION 



After a valid data base name is given, BUILDINQ now responds with the the message 
ALLOW INQUIRY ONLY (YES OR NO)? 

Enter YES if only inquiry is to be allowed; record update, creation and deletion is not 
allowed. BUILDINQ then continues by requesting "WHICH OPTION". 

However, if NO is entered, BUILDINQ responds with the message 

ALLOW UPDATE (YES OR NO)? 
Enter YES if UPDATE is to be allowed for the data base; otherwise, enter NO. 
BUILDINQ then responds with the message 

ALLOW CREATE (YES OR NO)? 
Enter YES if CREATE is to be allowed for the data base; otherwise, enter NO. 
BUILDINQ then responds with the message 

ALLOW DELETE (YES OR NO)? 
Enter YES if DELETE is to be allowed for the data base; otherwise, enter NO. 
BUILDINQ then continues as before by requesting "WHICH OPTION". 
When INQUIRY is generated using cards, the following cards are now accepted. 

1 . CREATE Card 

CREATE 

If this card is present, records can be added to the data base 
using INQUIRY. 

2. DELETE Card 

DELETE 

If this card is present, records can be deleted from the 
data base using INQUIRY. 

EXTENSION OF DMINQ PROCEDURE FOR CREATE AND DELETE 

The DMALGOL boolean procedure DMINQ [X] (A[*]) has been extended to provide for dynamic calls 
to accessrout ine procedures CREATE and DELETE. For calls to these procedures, array A is 
defined as follows: 
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A [0] = identifies desired procedure 

23 = create 

24 = delete current 

1. Create (A[0]=23) 

A [1] = unused 

A [2] = If variable format then record type, else unused 

A [ i ] , i >2 is unused 

2. Delete current (A[0]=24) 

A [i], i>0 is not utilized 



D3 245 INQ - ACCESSING RELATED RECORDS 

The REPEAT statement, as currently implemented, can be used to access records from a disjoint 
data set which are related to another data set by symbolic key. Examples of this use of the 
REPEAT statement, which are not in the DMSII Inquiry Reference Manual, are shown below. For an 
explanation of the syntax and semantics of REPEAT, see DMSII Inquiry Reference Manual (Form No. 
5001472), pages 5-24, 5-25, 5-46, and 5-47. 

The following DASDL defines the data base used in the examples. 

EMP DATA SET 

(EMPNO NUMBER(6); 
NAME ALPHA(20); 
SALARY NUMBER (8,2); 
EMP-JOBCODE NUMBER(2); 
EMP-DEPTNO NUMBER ( 4 ) ; 

EMPNOSET SET OF EMP KEY IS EMPNO; 

EMP-DEPTNOSET SET OF EMP KEY IS ( EMP-DEPTNOSET , EMPNO); 

DEPT DATA SET 

( DEPTNO NUMBER ( 4 ) ; 

DEPTNAME ALPHA (12); 

LOC ALPHA(12); 

DEPTNOSET SET OF DEPT KEY IS DEPTNO; 

JOB DATA SET 

( JOBCODE NUMBER( 2 ) ; 
TITLE ALPHA(20); 

); 

Example 1 



For each record of a disjoint data set, select a related record from another disjoint data set 

List the NAME, SALARY and DEPTNAME of all employees. 

SET DEPT TO DISPLAY NAME, SALARY, DEPTNAME AT DEPTNO=EMP-DEPTNO 
SELECT EMP, THEN REPEAT DEPT 



These INQUIRY statements result in the selection of an EMP record, then, selection of a DEPT 
record according to the selection condition given in the DISPLAY statement. For the EMP and 
DEPT records selected, NAME, SALARY, and DEPTNAME are displayed. Selection of additional EMF 
and DEPT records requires NEXT EMP statements to be entered. 

If a related DEPT record is not found for an EMP record, no items are displayed. Howev « r ' 
since an EMP record is selected, a DISPLAY may be given to display any items from the EMP 
record. 

To automatically select all EMP and DEPT records, the following statements can be given: 

SET DEPT TO DISPLAY NAME, SALARY, DEPTNAME AT DEPTNO=EMP-DEPTNO 

SET EMP TO SELECT EMP 

SET EMP TO REPEAT DEPT 

SET EMP TO LIMIT = NONE 

SET DEPT TO LIMIT = NONE 

REPEAT EMP 

The REPEAT EMP statement initiates the selection of EMP records. For each EMP record selected, 
the DISPLAY command for DEPT is executed. The setting of LIMIT = NONE for EMP and DEPT is 
required to override any previously specified display limits, implicit or explicit. 
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If a related DEPT record is not found for an EMP record, no items are displayed. 

To automatically select all EMP and DEPT records and display items from the EMP record even 
when a related DEPT record is not found, the following statements can be given: 

SET DEPT TO DISPLAY DEPTNAME AT DEPTNO = EMP-DEPTNO 

SET DEPT TO LIMIT = NONE 

DISPLAY NAME, SALARY VIA EMP, THEN REPEAT DEPT 

To generate a INQUIRY report listing the NAME, SALARY, and DEPTNAME for each employee, the 
following statements can be given: 

SET DEPT TO SELECT AT DEPTNO=EMP-DEPTNO 
SET EMP TO SELECT EMP 
SET EMP TO REPEAT DEPT 
REPORT NAME, SALARY, DEPTNAME 
GENERATE REPORT VIA EMP 

If a related DEPT record is not found for an EMP record, no items are reported. 
Example 2 



For each record of a disjoint data set, select multiple related records from another disjoint 
da t a se t . 

For each department, print the DEPTNAME and list the NAME and SALARY of all department 
empl oyees . 

SET EMP TO DISPLAY NAME, SALARY AT EMP-DEPTNO = DEPTNO 

SET EMP TO LIMIT = NONE 

DISPLAY DEPTNAME VIA DEPT, THEN REPEAT EMP 

These INQUIRY statements result in the selection of all DEPT records. For each selected DEPT 
record, DEPTNAME is displayed, and the REPEAT causes selection of EMP records according to the 
selection condition given in the DISPLAY for EMP. For each selected EMP record, NAME and 
SALARY are displayed. 

To generate a INQUIRY report containing the required information, the following statements can 
be given: 

SET DEPT TO SELECT DEPT 

SET EMP TO SELECT AT EMP-DEPTNO = DEPTNO 

SET DEPT TO REPEAT EMP 

REPORT DEPTNAME: NAME, SALARY 

GENERATE REPORT VIA DEPT 

If no related EMP records are found for a DEPT record, no information is reported for the 
corresponding department. 

Example 3 



Select related records which satisfy additional criteria. 

For each department, print the DEPTNAME and list the NAME and SALARY of all department 
employees who earn greater than 20,000 dollars. 

This query is identical to the query of Example 2 except that an additional criteria is imposed 
on the department employees. The following INQUIRY statements can be given: 

SET EMP TO DISPLAY NAME, SALARY AT EMP-DEPTNO=DEPTNO AND SALARY> 20000 

SET EMP TO LIMIT = NONE 

DISPLAY DEPTNAME VIA DEPT, THEN REPEAT EMP 

Example 4 

Select related records from more than two disjoint data sets. 

For each department, print the DEPTNAME and list the NAME, SALARY, and job TITLE of all 
department employees. 

This query is identical to the query of Example 2 except that an additional data set must be 
accessed in order to provide the employee job TITLE. The following INQUIRY statements can be 
given : 

SET JOB TO DISPLAY TITLE AT JOBCODE = EMP-JOBCODE 

SET JOB TO LIMIT = NONE 

SET EMP TO REPEAT JOB 

SET EMP TO DISPLAY NAME, SALARY AT EMP-DEPTNO = DEPTNO 

SET EMP TO LIMIT = NONE 

DISPLAY DEPTNAME VIA DEPT, THEN REPEAT EMP 
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D3 2 64 INQ - IMPLICIT QUALIFICATION IMPROVEMENT 
The following INQUIRY specifications affect the implicit qualification of subsequent duplicate 



SET statement 
CREATE statement 
UPDATE statement 
REPEAT <data set name> 
<select speci f icat ion> 
DISPLAY ALL OF <data set name> 
NEXT <data set name> 
GENERATE of subset 



the constructs above is given for a different data set. 



D3273 INQ - SETTING ITEMS TO "NULL," TESTING FOR "NULL" 
Data items may now be set to NULL value when records are created or updated in INQUIRY. In 
addit Ion data items may be tested for NULL when select. ng records. 



The revised syntax o 

I < 

-<alpha item> — 



f <create list> and <update !ist> is as follows: 



-<arithmetic item>- 



-<string> 

- NULL 

. = arithmetic expressions 

|- NULL 

<boolean item> — « --- TRUE 

- FALSE 



Data items which are REQUIRED or which do not have NULL values (e.g., Boolean items) cannot be 

set to NULL. 

The following syntax is now valid for a <boolean primary> in a ^election condition^ 

<alpha item name> FQL NULL | 



-<arithmetic item name>- 



- NEQ 



onlv data items which can have NULL values can be tested for NULL. If a data item is tested 
?or y NULL "wnlcTcInno. Save NULL values, the following error message .. g.ven: 

TEST FOR NULL IS SUPERFLUOUS— ITEM CAN NOT BE NULL 
If a data item is undefined because the item does ^ appear i n the var i able, forma t .P-tion^of 

5 E' t i? u ;?;.i € . o ^> o ^ t ssii? b :tr. p u.f..!f: io e FAL SE un d ?i: age 1 22 ot the «.n inquiry 

Reference Manual (Form No. 5001472) for a discuss. on of undef.ned .terns.) 

D3450 INQ - "SAVE" COMMAND 
Page 5-45 of the DMSII INQUIRY Reference Manual, should be changed as follows: 

Paragraph 4 

FROM 

"Non-privileged users can create and save system files, but cannot access them." 

TO 

"Only privileged users can create and save system files." 

Paragraph 5 
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FROM 

JNon-privileged users can create and save files under other usercodes, but cannot access 
TO 

"Only privileged users can create and save files under the usercodes." 
D3489 INQ - GROUP KEYS IN LOGICAL DATA BASES 

A restriction currently exists in INQUIRY concerning group keys in remapped sets of logical 
kev items "\h.,. iSEitt'X ,tems , w, f h,n 8u ° h keys are not recognized in selection expressions as 
key items, thus INQUIRY does not always choose the most optimal search strategy when these 
items are referenced. As a detour, either use the group item name when feasible in the 
selection expression or declare the set in DASDL using only elementary items. 

D3615 INQ - SEGMENTED VALUE ARRAYS 

Before segmented value arrays were implemented in ALGOL, data bases with a large total number 
of structures and items were handled differently from small data bases For laree data bases 
the DMINQDIRECTORY created by BUILDINQ was used during INQUIRY ISiTillization. Now, segmented 
value arrays are used for all data bases. B 

D3621 INQ - "LOCKTOMODIFYDETAILS" 

If a data set has the DASDL option LOCKTOMODIFYDETAILS set, INQUIRY cannot be used to create 
delete or modify any of its descendants. ' 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - INQUIRY 

P2759 INQ - OPTIMIZE "FIND VIA" <SUBSET> "AT" <CONDITION> 

Previously, when a data set was accessed VIA a subset with multiple ^"'^^speci fied^ i ^ f the 

condmo - : app?f d °"now "nen^easibU, thT'se 1 ec"t ion condition is used to search subset 
eyries Only data set records for qualifying subset entries are then read. 

P3000 INQ - SYSTEM "ID" AND PATCH IN HEADING 

The system type and software version number are now displayed by INQUIRY. 
P3001 INQ - INVALID PAGE BREAK ON CONTROL BREAKS 

If the PAGE ootion were specified in the REPORT statement for a higher level control item, a 

PAGE br ak would incorrectly be taken when a lower 1 evel control . tern changed yaue. In 

addition when a higher level control changed value but a lower level contro item retained the 

same value tnelowfr level control item was not properly printed in the control break heading. 
Both problems have been corrected. 

P3032 INQ - CHANGE TO MAXIMUM DISPLAY 

,„.:„, irtuiTS to NONE or not specifying a limit in a DISPLAY statement would result in a 
detain HmTt of 409?; thus? a NEXTcommand was required after 4095 records were d.sp ayed. 
This de fail? upper limit'has been removed. Specifying no limit now truly results in no limit. 

P3161 INQ - TRUNCATION OF POSITION "132" 

INQUIRY now uses character position 132 on the printer file. 

P3186 INQ - REPORTING LONG SUBSCRIPTED ALPHA ITEMS 

INOUIRY reported incorrect values of subscripted alpha items via the REPORT s t atement This 
wouYd occuTwheneve? the declared length of the item was greater than the column width and the 
subscript for the item was not 1. This problem has been corrected. 

P3188 INQ - USE OF "0" IN UNQUOTED STRING 

&ssj:' Kfisj-K'-ia :-'^.:':!Si , ws:s;j s: , }.:i:::s.; , S-:a."nr;:..T=-Ji: 

been corrected. 

P3334 INQ - "SET DISPLAY" RESULTS IN IMPROPER LIMIT 

Soecifvine a DISPLAY via the SET verb could sometimes result in an unexpected and improper 
display lfmit For example, the following sequence would result in a d. splay limit of 5: 

SET Dl TO DISPLAY 5 VIA SET 
SET Dl TO DISPLAY VIA SET 

Specifying a DISPLAY via the SET statement now results in an implicit LIMIT specification of 
NONE or the explicit LIMIT given in the DISPLAY. 

P3387 INQ - FUNCTIONS PERFORMED VIA EMBEDDED MANUAL SUBSET 
INOUIRY failed to recompute a function that was performed VIA an embedded manua 1 subset each 
Hme the owner of that'subset changed. This Problem has '"'"""'S wh ^ T wn d D 
data base having data sets Dl and D2 , and an embedded manual subset EMI which is owned Dy 
and spans D2 . 

DISPLAY <item of Dl > , SUM(< i t em of D2>VIA EM1)VIA Dl 
INQUIRY will now compute the correct sum for each record of Dl . 

P3443 INQ - ENTERING INPUT BEFORE PREVIOUS OUTPUT FINISHES 

On some occasions, if input is entered, other than a space or "NEXT", before the di splayed 
outpuT generated" by a macro invocation was completed, an improper syntax error or INVALID INDEX 
would occur. This problem has been corrected. 

P3444 INQ - "?AX" NOT RECOGNIZED ON LINEAR SEARCH OF SET 
Previously, a linear search through a set could not be stopped by entering an "?AX". This 
problem has been corrected. 
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P3445 INQ - DISPLAY ITEM NAME 



INQUIRY failed to print the item name when printing long alpha items under terminal format tab 
This problem has been corrected. 

P3446 INQ - "#NONE","#NO MORE" TERMINATION 

Previously, #NONE or #NO MORE was treated as an error condition and caused termination of a 
multiple-statement input or multiple-statement define. This has been corrected. 

P3447 INQ - ROUNDING VIRTUAL ITEMS 



reviously, commands that compared an INQUIRY virtual item to a literal value which had digits 
J the right of the decimal point rounded the literal value before doing the comparison 
ansequently, records which met the selection condition were not selected. This is no longer 



P3490 INQ - RECALL OF "UPDATE" COMMAND 



Previously, the RECALL command would change some literal values given in an UPDATE command 
For example, assuming an item described as REAL (S5,3) in a data set D, if the following 



commands were issued: 

SET D TO UPDATE I=.082 
RECALL D UPDATE 

INQUIRY would respond as follows: 

UPDATE I: =.08. 

Similarly, if the following commands were issued: 

SET D TO UPDATE 1=5.428 
RECALL D UPDATE 

INQUIRY would respond as follows: 

UPDATE I: =5. 542 

This problem has been corrected. 

P3555 INQ - INCREASE NUMBER OF DATA SET FUNCTIONS ALLOWED 



Previously, the maximum number of data set functions (i.e., AVG, SUM, COUNT, etc.) over a given 
set data set that a user could perform the following actions simultaneously was 15: 



1) have as virtual items, and 

2) use in a command. 

This limit has been raised to 48. 

P3655 INQ - SORTING ON SUBSCRIPTED ITEMS 

Records were not properly sorted when a sort key was a non-occurring item in an occurring group 
and the item was not the first item within the group. In addition, a syntax error resulted 
when a multiple-subscripted item was given as a sort key. These problems no longer occur. 

P3 701 INQ - SEARCH ON INDEX RANDOM SET 

INQUIRY sometimes performed a KD search on an index random set when it was possible to do a 
more efficient KI search on a different set. For example, given the DASDL: 

D DATASET (Dl NUMBER (2),); 

51 SET OF D KEY IS Dl INDEX RANDOM; 

52 SET OF D KEY IS Dl INDEX SEQUENTIAL; 

and the command: 

DISPLAY Dl AT Dl > 10 

INQUIRY would execute the command by doing an KD search on the set SI. Now, INQUIRY wi 11 do a 
Kl search on S2 . > -c 



P3745 INQ - VIRTUAL ITEMS EVALUATED 



f some 
NUMBER 



Previously, INQUIRY would occasionally lose a little accuracy in computing the value o 
V ,lVi^ items. For instance, given two data items A and B, each having the description 
(S9,2), and a virtual V=A-B: v 

I^O^fsfsXloX^U^ead \? ? % '" ' > articU,a ' " C ° rd ' V ™" ld "e computed to be 
Not only did this problem cause the wrong value to be reported for V, but it also caused some 
records to be skipped when INQUIRY was processing a command which used V in a selection 
expresson (like V=0). This problem has been corrected. 
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P3747 INQ - IMPROVED SEARCHING CAPABILITIES 
INQUIRY is now able to better determine the best set to use in searching for the data records 
that satisfy the selection expression. 

P3791 INQ - "DISPLAY ALL" CORRECTION 

s: r K^L^.:r-s.::J^ , \rrji!i./:a , :!-r^av..::: , t r ;uTi«.::..^ , .J..-?i: 

Held were occasionally reported wrong. This problem has been corrected. 
P3792 INQ - DO NOT CLOSE DATA BASE IF "TASKVALUE=1 " 

corrected. 
P3797 INQ - REPORT CONTROL ITEMS 
If an item in an occurring group were used as a control item in a report INQUIRY did not 

has been corrected. 
P3823 INQ - "DISPLAY ALL" OF GLOBAL DATA 
INQUIRY was dying with a "STACK OVERFLOW" when the following commands were issued: 

SELECT <global data name> 
DISPLAY ALL 

This problem has been corrected. 
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D3229 INTERFACE - DATA BASES AT DIFFERENT RELEASE LEVELS 

INTERFACE has been enhanced to accept data bases at different release levels. Previously, all 
data bases invoked by a single program were required to be at the same release level ' This 
restriction has been eliminated. 

On the Mark 31 release, a program may invoke both Mark 31 and Mark 30 data bases. On the Mark 
32 release, a program may invoke any combination of Mark 32, Mark 31 and Mark 30 data bases. 

Because the description file format was changed extensively on the Mark 30 release, INTERFACE 
cannot read description files created on Mark 29 or earlier releases. Programs compiled with 
the new INTERFACE may invoke only Mark 30 or later data bases. 



D3305 INTERFACE - ANOMALIES OF LOGICAL INVOCATIONS 

Certain logical data base invocations may produce unexp 
invoked via a logical data base declaration, DATABASE/ 
subset to reference an appropriate structure which was 
the data set referenced by the link or subset is 
however the data set is not included, then the referenc 
fixed-up to point at a remap of the data set which wa 
two or more remaps of a single data set are included in 
the one listed last is chosen. Since this fix-up pr 
data base declaration and not on what was actua 
DATABASE/ INTERFACE to fix-up a link or subset to 
unexpected results may occur when two or more possible 
in a logical data base but not all of them are in 
logical data base, a safer method is to create partial 
to invoke. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - INTERFACE 



P3103 INTERFACE - SETS NOT INVOKED IN LOGICAL "DB" PROPERLY 

ft^S* lZlr\y° { r fNTERFACE^u!r?„^i^cTfrPo?n? k S d n invoked' SeT ai & ?nvote« rS£ .JSJ 
??he or? iSal data se were invoked. INTERFACE wi 1 1 now point an invoked set at an .nvoked 
remap of ISe Original data set only if the data set itself is not .nvoked. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - LOADDUMP 



D3614 LOADDUMP - ELIMINATE "OPEN INITIALIZE" 

The OPEN INITIALIZE command has been de-implemented. ARCHIVEUPDATER can no longer OPEN 
INITIALIZE a data base. LOADDUMP now opens the data base UPDATE instead of INITIALIZE. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - LOADDUMP 

P3712 LOADDUMP - "TITLE" NOT PARSED CORRECTLY 

Previously, LOADDUMP was not parsing the optional TITLE part of a file specification correctly. 

This problem has been corrected. 
P3713 LOADDUMP - PREVENT "SEG ARRAY" ERROR 

Previously, LOADDUMP could cause a SEG ARRAY error while trying to compare the values of two 

strings. This problem has been corrected. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - PRINTAUDIT 



P2760 PRINTAUDIT - USE AUDIT RECORD INFORMATION TABLE 

PRINTAUDIT now uses the audit record information table from PROPERTIES to locate various 
control information in audit records. 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 DMS II - PRINTAUDIT 



PAGE 25 5 
B6000 SERIES MARK 32 

DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - PROPERTIES 

D3113 PROPERTIES - DELETE "READAHEADB" 

Since the READAHEAD option in DASDL has been de l»pl ement ed , this property has been removed. 
D3116 PROPERTIES - PUT SUBSYSTEM "ID" IN TEXT 

proper subsystem. 
D3118 PROPERTIES - REMOVE PROPERTIES FOR "27" LINKS 
The following properties, which were used with 27 links, have been removed: 

ORIGOCCURSF 

ORIGTOTALSZ 

ORIGOFFSET 

ORIGOCCURSMIN 

ORIGOCCURSMAX 

ORIGLINKTYPE 

D3162 PROPERTIES - "DASDL" DEFAULTS 

* j k, riisni «rp now used bv all tailored software, thus 

1^\1?\VS I £T\17^ It tL M^ L 3i a DMSII°Te.ea:e ^consolidate and improve physical 

attribute calculations. 
D3272 PROPERTIES - RESTRUCTURE DESCRIPTION FILE PROPERTIES 

The PROPERTIES listing has been alphabetised to facilitate finding '"^idual proper il„ I. the 

listing. In addition, each property has been given a usage Ms *» c program . This 

na::i!,"<!:s.a' :i"s.":^:! r.f us; ;,>% 5 ; a. t . . .;ujr:: u u:::.:s 
iv, 1 ."' !5i;;; p i'«.""p«:"'""'"«"°»" '"" !!;; » .IS"..,;"":-:,. ..... .. >.o»o.oo .. 

the PROPERTIES symbolic. 
D3274 PROPERTIES - STRUCTURE CALCULATIONS 

5KK!S.r?.r:i?!s.: rcxi"S !:;ni::s ki-kji-k.jt.pist.!:™'- •"•"■" 

D3317 PROPERTIES - CRUNCH "PROPERTIES" SYMBOLIC 
The new symbolic file produced when DATABASE/PROPERTIES is run will now be crunched, have a 
blocksize of 420, and an areasize of 1008 records. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - PROPERTIES 



P3556 PROPERTIES - INITIALIZATION OF DISJOINT UNORDERED DATA SET 

iVr?T?iS int un °i der , e , d dat » set with blocksize of one record was improperly initialized by 
UllLIIY on the Mark 31 system software release. This would cause the ACCESS ROUTINES to 
infinitely loop when attempting to sequentially access the initialized structure. A 
reorganization of the initialized structure would result in a S EG ARRAY error. This problem 
has been corrected. r 

P3814 PROPERTIES - INCORRECT OUTPUT REPORT 

In some cases, the report produced by the UTILITY INITIALIZE procedure contained a double ON 
<packname> part. This problem has been corrected. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - PARTITION CONTROL 

D3466 PTNCTL - "28" TO "29" CONVERSION OPTIONS REMOVED 
Tbe PARTITIONCONTROL functions associated with conve "^ fro. -.rk^^.ofcrk^M data phases 
have been removed. tne program s ohi y = M/rayIf £ NTROL DMCONTROL uses this information to 
PARTITIONING data «' "^J^"" lt ° f^^f ^' C oS?rTlfiIe in response to a "RECOVER 
PARTITIONS" revest! ' °PARt{t! ONCONTrSl no longer requires user interaction in any form. 
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D3050 RECOVERY - HALT/LOAD RECOVERY SEQUENCING 
Halt/Load Recovery Sequencing 

The sequencing of image application in Halt/Load recovery has been changed. Formerly before 
images were applied from the end of the audit to the last quiet point (i.e., an audit record 
indicating the null transaction state; e.g., a syncpoint). After images were then applied from 
the second control point (or its equivalent) preceding the end of the audit to the last quiet 
?£i a. ?i. Present implementation, after images are applied from the second control point 
through the end of the audit; then before images are applied from the end of the audit to the 

l^.JBrarrJ^'""'' J " eW u impl !™ ent at ion more accurately models the action of the 

ACCESSROUTINES in creating the audit and ensures that, at the start of before image 

application, the data base will be logically in the same state as it was when the Halt/Load 

uct ur re Q * 

The following is a graphic representation of the new implementation of Halt/Load recovery with 
respect to the audit (CPT=control point, QPT=quiet point): 

CPT CPT QPT Halt /Load 
x j 

(2) 

' < 

(3) 

' < • 

: (4) 

> 

(5) 

• < 

(1) Find the end of the audit. 

(2) Find the last quiet point (not applying images). 

(3) Go back 2 control points (not applying images). 

(4) Apply after images to the end of the audit. 

(5) Apply before images to the last quiet point. 

REBUILD 



Formerly, REBUILD would abort while attempting to rebuild to the end of a disk audit of 
unrecovered data base. It will now rebuild the data base successfully. 

REBUILD and RECONSTRUCT 



REBUILD and RECONSTRUCT wi 1 1 now create restart points at all recovery #1 records they 
encounter (after applying before images to the last preceding quiet point). This will 
alleviate the problem represented by the following example (numbers represent TSNs): 

Point Recov Recov Halt/ 

J A Qf T |___ #f #? |_ Load 

io ii "29 " ' X 

Assume that a Halt/Load occurred during a REBUILD or RECONSTRUCT, that at the time of the 
Vq l,« t t iSv !!• '"tart point was Point A (and not the Recov #1 record) and, further, that 
Z9 was the TSN on disk for the given table. After restarting, the REBUILD or RECONSTRUCT would 
abort with an invalid TSN while attempting to apply before images to 11. The invalid TSN 
occurred because before image application requires that the TSN in the audit be greater than or 
equal to the TSN currently on disk. If the restart point is the Recov #1 record (which the new 
implementation ensures), the problem is avoided since before images will not be applied until 
the audit TSN is greater than or equal to the TSN in the data base. 

D3051 RECOVERY - SWITCH BACK TO PRIMARY AUDIT 

If RECOVERY uses the secondary audit for error recovery, RECOVERY will now revert to the 
primary when it is finished using the current audit file. 

D32 89 RECOVERY - ALLOW NORMAL "REBUILD/ROLLBACK" 

Formerly, REBUILD and ROLLBACK wo u 1 d terminate abnormally if either: 

A. An audit IO error were encountered, or 

B. An audit file which did not exist or was unusable were required by the REBUILD or ROLLBACK 
(e.g., REBUILD THRU AUDIT 2300" where the last audit file available is 2299). 
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In Case A, RECOVERY would terminate with an error message for the IO error; in Case B, RECOVERY 
would continue asking for the audit file until DSed. 

Now, in both of the above cases, the following options are available: 

1. RECOVERY may terminate normally at the point where the IO error occurred (case A), or 

2. RECOVERY may terminate normally at the point where the request for the unavailable file was 
made (Case B) . 

In Case A the message "AUDIT IO ERROR: TERMINATE TO FINISH NORMALLY - OTHERWISE DS" is 
dUnlaved A reply of "TERMINATE" will cause normal termination. Any other reply will cause 
abnormal d termtnatiSn y In Case B, along with the usual "RETRY s^,-"!'*? j , c ^ se m „ormal 
"TERMINATE TO FINISH NORMALLY" is displayed. A reply of TERMINATE will cause normal 

t erminat ion. 

D3464 RECOVERY - QUICKFIX FAILS ON INCONSISTENT PARTITIONS 

Pr . vinl] , lv for oartitioned data bases, QUICKFIX would occasionally fail with "PARTITION NAME 
TABLE INCONSISTENT WITH AUDIT" because of faulty PARTITION NAME TABLE initialization prior to 
the AFTER IMAGE application phase. This problem has been corrected. 

This correction however, forces the QUICKFIX PREPASS phase to locate a BCP, DBS1, DBST, RECOV 
FILEDC or STRDC audit record; thus, the PREPASS phase could possibly exceed the LIMIT 
specification indicated to UTILITY. 

D3465 RECOVERY - AUDIT DISCONTINUITY 

A DASDL update which alters the number of OPENPARTITIONS for a structure, effectively creates a 
discontinuity Tn the audit. That is, the RECOVERY compiled fol owing the update cannot use 
audit created p "or to the update and similarly, the RECOVERY compiled prior to the upda e 
cannot "eaSSl? Seated lifter the update . Fol lowing the update, therefore, the ENTIRE data 
base must be dumped using UTILITY. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - RECOVERY 



P2789 RECOVERY - ENSURE "REBUILD" RESTART 

Previously, it was possible for REBUILD to write information to the REBUILDINFO file and later 
be DSed or Halt/Loaded without having created a restart point. Under these circumstances, 
REBUILD would abort on rerun. This problem has been corrected. 

P2879 RECOVERY - "RLA" FOR ABORT, HALT/LOAD ONLY 

Formerly, it was possible for REBUILD and ROLLBACK to write to the Row Lock-out Audit. In 
General, this is useless since the locked-out row( s)/s t rue ture(s) are not Qui ckf i xabl e . Now, 
only Abort and Halt/Load recovery will write to the Row Lock-out Audit. 

P2887 RECOVERY - DO NOT PRINT AUDIT BLOCK IF "EOF" ENCOUNTERED 

The diagnostic information printed when an error occurred in RECOVERY would fail if end-of-file 
had just been encountered on the audit. The problem has been corrected. 

P3036 RECOVERY - TEST GENERATES TOO MUCH CODE 

Previously, a data base with a large number of structures could cause the compilation of 
RECOVERY to abort with a "PROGRAM SEGMENT TOO LARGE" error in procedure TEST in 
NEXTPARAMETERREC . This problem has been corrected. 

P3109 RECOVERY - UPDATE DISK HEADER 

Previously, RECOVERY attempted to update disk headers for a file it had not referenced. This 
can no longer occur. 

P3144 RECOVERY - READ WRONG AUDIT BLOCK 

Formerly, the physical and logical positioning for tape audits could get out of sync with one 
another. This would cause the wrong audit block to be read, resulting in "unexpected ABSN" , 
"unexpected timestamp", etc. This no longer occurs. 

P3491 RECOVERY - ROW OF ORDERED DATA SET LOCKED OUT 

Previously, RECOVERY could erroneously lock out a row of an ordered data set when attempting to 
apply a TABLE AFTER IMAGE audit record which referred to a newly-allocated block. This problem 
has been corrected. 

P3 567 RECOVERY - ROLLBACK FAILS ON "FILEDC/STRDC" 

Previously, under certain circumstances, ROLLBACK would fail with an "UNEXPECTED AUDIT RECORD 
TYPE" on a FILEDC/STRDC audit record in APPLYBEFOREIMAGES . This problem has been corrected. 

P3667 RECOVERY - CORRUPT AUDIT STOPPER 

If RECOVERY were DSed when it was fixing up the last audit block (after it had written the 
audit block and stopper but before it had set auditfile last record), when Halt/Load recovery 
was run, it would fault with "UNEXPECTED AUDIT BLOCK SERIAL NUMBER". This problem has been 
corrected. 

P3668 RECOVERY - INVALID UNIT NUMBER 

When RECOVERY gets an error reading the audit file, it displays the message "ERROR READING 
AUDIT FILE ON UNIT <n>". The value being displayed for audits to disk was not a valid unit 
number. Since a unit number is not valid for a disk file, RECOVERY will now display the 
familyname if the audit is to disk and the unit number if the audit is to tape. 

P3669 RECOVERY - OPTION "USE DUP" 

If RECOVERY could not find the desired audit file, it would display the message "RETRY OR 
USEDUP OR FAMILY=<fami lyname>" . USEDUP was not accepted as a valid response. This problem has 
been cor r ec t ed . 

P3757 RECOVERY - " SEG ARRAY" ERROR 

When RECOVERY cannot find an audit file, it prompts the operator to enter one of several 
options. If the operator entered "AX FAMILY=< f ami 1 y name>", where <family name> was longer 
than allowed, a SEG ARRAY error occurred. This problem has been corrected. 

P3 820 RECOVERY - SPLIT INDEX RANDOM TABLES 

In Afterimages, a SPIRT may cause the new table to get the wrong number of entries. If an AIRE 
for the new table is encountered by RECOVERY after the SPIRT, it will terminate abnormally with 
a "VALIDITY CHECK FAILED" message. 
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D307 3 REORG - "REORGANIZATION" ACCELERATION 

The speed of REORGANIZATION has been significantly increased by optimizing the serial I/O 
performed on DMSII structures requiring generation or fixup. Buffers used in REORGANIZATION 
are resized to facilitate the reading and writing of multiple blocks in one physical I/O; thus, 
a significant decrease in I/O time is achieved at the expense of some increase in core 
utilization. Also, better utilization of space on intermediate tape files is achieved by 
packaging normal blocks into "large" tape blocks. 

D3120 REORG - " DASDL/REORGAN I ZAT I ON " ENHANCEMENTS 

In t roduc t ion 



Several new features have been added to the existing DASDL/REORGAN I ZAT I ON package which will 
allow the DMSII user to more conveniently change the data base description. The user will now 
be able to : 

1) increase or decrease the size of a data item 

2) change the type of an item 

3) change the sign of an item 

4) change the occurs clause for an item 

5) add, delete, or reorder booleans in a field item 

6) change the key, key data, ascending/descending, 
and duplicates clause for a set 

7) change the key, key data, ascending/descending, 
duplicates clause, and where clause for an 
automat i c subset 

8) change a remap description on a DASDL update 

Item Type and Size Changes 



The table below shows all the valid item type conversions and the affects of each on the 
original data. This table also shows the effect of an item size change with no type change. 
Where possible, COBOL74 move rules were modeled in performing the transformations. For moves 
not covered by COBOL74, the transformation attempts to preserve as much of the original data as 
poss i b 1 e . 
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Sign Changes 

A sign may be added to or deleted from a REAL or NUMBER item. When the sign is added, a 
positive sign will be generated as the item is moved from the old data set record to the new 
data set record. If the sign is deleted, the sign will be deleted from the item as it is 
moved . 

Changes to Occurs Clause 



Occurrences of an item or group may be increased or decreased. An occurs clause may be added 
or deleted. Data will be lost when occurrences are decreased. When occurrences are increased, 
items or groups in the new data set record with no source in the old data set record will be 
filled with the appropriate initialvalue or null value using the CLEARDATA text. 

Field of Boolean Changes 

Booleans may be added to, deleted from, and reordered in an existing field item. This is done 
by simply specifying the field with the desired modifications in the DASDL reorganization run. 
Existing booleans in the field which are included in the new specification for the field retain 
their information across the reorganization. 

Changes to Sets and Automatic Subsets 



Key, key data, ascending/descending, and duplicates may now be changed for a set. Key, key 
data, ascending/descending, duplicates, and the where clause for an automatic subset may also 
be changed. Changes involving items may be explicit (changes to items as used by an index set) 
or impl i ci t (changes to items as they are described in the data set). All of these changes to 
indexes require that the index be generated from the data set during reorganization except 
where no duplicates to duplicates first or last is the only change. The DASDL compiler will 
notify BUILDREORG when a set or subset must be regenerated from the data set and BUILDREORG 
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will create a proper default generate. To notify DASDL that you intend to make changes to an 
index set (whether explicit or implicit), the following new syntax has been added: 



REORGANIZE 



( — KEY CHANGED ) -| 

- SAME 



The existing "REORGANIZE" clause without the parenthetic clause is still valid and implies 
"REORGANIZE ( KEY SAME )". To notify DASDL that the key, key data, ascending/descending, 
duplicates (except NO DUPLICATES to DUPLICATES FIRST or LAST), or the where clause should be 
changed, "REORGANIZE ( KEY CHANGED )" should be specified. 

Changes to Remap Descriptions 

Remap views of the data set may be redefined on a DASDL update run. DASDL will detect the 
changes to the remap and invalidate old programs using that remap. See paragraph on UPDATE 
LEVEL MECHANISM. 

Changes to Compact, Verify Clause, and Select Clause Items 

Item changes may also be made to compact items, compact 
controlling items, and items used in select and verify clauses. 
The user should be cognizant of the fact that decreasing the size 
of compact controlling items may cause data loss in the 
controlled field during reorganization. 

Trans lat ion 

alpha or group to 

number 
real 
field 
bool ean 

The ALGOL INTEGER function is used to convert EBCDIC characters to integers. These integers 
are then handled as number to number conversions. (See TRUNCATION for EBCDIC representations 
of numbers.) The integer representation is returned (e.g., "1234" becomes 1234). When an item 
is converted to a Boolean item, the new item's value is determined by the contents of the old 
item. If the old item is an alpha, the Boolean value is obtained from the least significant 
bit of the rightmost character. If the old item is a group, the Boolean value is obtained from 
the least significant bit of the leftmost character. Special EBCDIC characters are handled in 
the fol lowing way : 

1) high order four bits are disregarded 

2) if binary value of the low order four bits is less than or 
equal to 9, then that value is returned 

3) if the binary value is greater than 9, then the value is 
set to 8 or 9 by turning off bits 1 and 2 

(ex. a "$" which is a hex "5B" becomes a 9 and 
a "=" which is a hex "7E" becomes an 8) 

number 
real 
field 
bool ean 

to alpha or group 

An ALGOL statement of the form " REPLACE .... FOR n DIGITS" will be generated to perform the 
needed translation. Number and Real items with fractional parts will be integerized via 
truncation and then transformed. Signed items will lose their sign during (transformation. 

Truncat ion 

If scalefactor decreases, the least significant digits of the fractional part are truncated. 
If precision decreases, the most significant digits of the number are truncated. 

Res t r i ct ions 

1. Key, key data, ascending/descending, or duplicates clause for a manual subset cannot be 
changed . 
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2. Key, ascending/descending, or duplicates clause for an access cannot be changed. 

3. Key, key data, ascending/descending, duplicates or the where clause for an embedded set or 
subset cannot be changed. 

4. Items used by self-correcting, symbolic, or verified links between data sets cannot be 
changed. +PCNALL (10-29-80) 

Effect of Reorganization on User Programs 

Some changes to data sets, sets, subsets and remaps will invalidate existing programs. These 
programs must be recompiled following the dasdl UPDATE. Old programs which are not recompiled 
will receive Version Error #2 exceptions at run time if they attempt to access modified 
st ructures . 

Programs must be recompiled if they invoke structures changed in the following ways: 

1. Data sets updated using the REORGANIZE (ITEMS CHANGED) option. 

2. Sets or subsets updated using the REORGANIZE (KEY CHANGED) option. 

3. Remaps which include new items, delete existing items or which include data items which have 
been changed in the data set. Programs which invoke remaps must be recompiled only if the 
remap changes; changes to the data set that do not affect the remap will not affect the 
program. 
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P2880 REORG - ELIMINATE ATTRIBUTE ERROR " FAM I LYNAME " 

A FILE ATTRIBUTE ERROR ON FAMILYNAME occurred when COPY was to FINAL medium; this error did 
not, however, affect REORG operation. This error no longer occurs. 

P28 8 8 REORG - INVALID BLOCK ON STANDARD DATA SET 

Occasionally, REORGANIZATION would cause an empty block to be created in standard non-variable 
format data sets. This empty block would cause the following: 

1. A CHECKSUM error 

2. an entry missing from auto set/subset (delete) 

The affected data set can be fixed by using REORGANIZATION with a "ORDER BY" set. 

P2954 REORG - BAD "BCW" FOR ORDERED DATA SETS WITH SUBBLOCKS 

When generating an ordered data set having subblocks, REORGANIZATION would occasionally 
generate a block with a bad BCW. Also, a subbllock could have been created having a size which 
was not a multiple of the DASDL-spec i f i ed SUBBLOCKS I ZE . Both problems have been corrected. 

P3093 REORG - REORGANIZATION OF EMBEDDED ORDERED DATA SET 

The reorganization of an embedded ordered data set could subsequently cause a FATAL ERROR in 
the ACCESSROUTINES. The error would occur when records were deleted from the data set and 
blocks were returned to the available space chain. To eliminate this problem, the data set 
must be reorganized with a REORGANIZATION program which includes this change. 

P3145 REORG - CORRUPTION OF COMPACT DATA SET 

Previously, a compact data set could become corrupted after REORGANIZATION had been run on the 
data set This problem was due in part to REORGANIZATION setting up a table block incorrectly 
for compact data sets. In addition, the ACCESSROUTINES was not making the proper checks on 
table blocks and eventually corrupted the table blocks. These problems have been corrected. 

P3190 REORG - SPECIFYING "COPY" 

If a "COPY TO <medium>" or "COPY TO <medium>, COPY BACK AT END" were given for a structure 

requiring only fixup, a warning message was issued by BUILDREORG and a "no file condition 

subsequently resulted in the REORGANIZATION program. The COPY wi 1 1 now be ignored and not 
cause the "no file" problem in the REORGANIZATION program. 

P3191 REORG - REORGANIZATION OF STANDARD DATA SET 

If a standard variable format data set was reorganized having a blocksize within one or two 
words of a segment boundary and ADDRESSCHECK and/or CHECKSUM were set for the structure, an 
empty structure could result from the reorganization. This problem has been corrected. 

P3318 REORG - "INVALID INDEX" BY ZERO LENGTH READ 

Reorganization no longer does zero length reads. This could cause an invalid index in the MCP 
I/O rout ines . 

P3397 REORG - " IXSEQ" WITH MULTI-COARSE TABLE LEVELS 

REORGANIZATION did not correctly layout an index sequential structure which required multiple 
levels of coarse tables (e.g., the number of entries in the structure was greater than the 
square of the LOADFACTOR TIMES <the maximum number of entries per table>). The resultant 
reorganized structure would cause fatal errors in the ACCESSROUTINES. This problem has been 
corrected. 

P3401 REORG - "CFUPDATEVERSION" ON PASS "1" OF "FIXUP" 

A CFUPDATEVERSION was done when the structure was opened in Pass 1 of the FIXUP algorithm. 
This has been changed to a CFCHECKVERS I ON since Pass 1 does not change the structure but only 
reads i t . 



P3484 REORG - "CFAUDINZ" ONLY VALID FOR AUDITED DATA BASES 

After reorganization of an unaudited data base, CFFILESTATEF ^reorganized S K^*"I!\ W ?* 5?J 
to CFAUDINZ in the control file and was never reset by ACR to CFFILENORMAL Although this did 
not cause any subsequent problems, CFFILESTATEF is now set to CFFILENORMAL for reorganized 
structures in an Unaudited database. Code in UTILITY has been el im.naed which tes ted for 
CFAUDINZ when the data base is unaudited. Since this code was totally irrelevant to unaudited 



data bases, it caused no problems. 
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P3486 REORG - INVALID DIRECT DATA SET 



It was possible in a direct data set that an invalid record was improperly recognized as valid 
by REORGANIZATION or UTILITY. This would cause a fatal error in REORGANIZATION and an invalid 
record to be printed as valid in UTILITY. These problems have been corrected. 

P3492 REORG - ADDING CHECKSUM TO COMPACT DATA SET 

When running REORGANIZATION to add a checksum to a compact data set, the REORGANIZATION program 
could fail with a CHECKSUM I/O error when reading the old structure. This problem has been 
cor rec t ed . 

P3670 REORG - RECORDS WITH UNDEFINED RECORD TYPE 

Previously, REORG failed with a DATA ERROR #2 when it encountered a STANDARD VARIABLE FORMAT 
data set record with an undefined (i.e., all Fs) value for the record type. This occurred even 
though the record was actually a deleted record. These records are now oronerlv ianored bv 
REORG. * 

P3 671 REORG - IMPROPER BIT VECTOR GENERATION 

Two situations caused BIT VECTORS to be improperly generated. The first situation occurred 
when TABLESIZE for the BIT VECTOR was not a multiple of 48. REORGANIZATION would then not use 
all bits in the last word of a table. This was incompatible with other data base software 
which assume that all bits in a table are used to represent records in the data set. The 
second situation occurred when a BIT VECTOR was generated from the data set. If the data set 
contained any available records within its data blocks and the data set was not also generated, 
the BIT VECTOR would not contain bits for these records. Both situations resulted in 
corruption of the BIT VECTOR; both problems have been corrected. 

P3672 REORG - DISK RESIDENT STRUCTURE 

Under certain circumstances, REORGANIZATION would fail with an ADDRESSCHECK error when 
attempting to reorganize a structure resident on DISK, even though ADDRESSCHECK was not set for 
the structure. This problem has been corrected. 
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D3052 UTIL - CLEAR "TPS" INFORMATION 

When UTILITY is used to initialize all data base structures, Transaction Processing System 
information in the data base control file is also initialized. If only selected structures are 
initialized, the TPS information will remain unchanged. 

D3431 UTIL - EXPLANATION OF <RECOVER SOURCE> 

Add the following to the DMSII Utilties & Operations Guide (Form No. 5001803), Page 4-37, 
following the last paragraph: 

"UTILITY expects all files named in a <recover list> to reside on the corresponding <recover 
sourco. If more than one tape is named in .[recover source>, all files must reside on each 
tape. " 

D34 51 UTIL - LABEL EQUATION OF DATA BASE DESCRIPTION FILE 

Label equation of the DMALGOL compiler file DASDL when compiling UTILITY must specify the title 
of the data base description file as DESCRIPT)[ON/<data base name>. Any other file title for 
the compiler file DASDL may cause the INTERFACE to wait with a 

NO FILE DESCRIPTION/<data base name> 

message or may cause an inappropriate description file to be used. This situation arises 
because UITLITY both invokes the data base and requires the description file be supplied to the 
compiler. The compiler file DASDL may be equated, but the INTERFACE'S DASDL file cannot be 
equated. The INTERFACE always uses DESCRIPTION/<da t a base name> [where <data base name> is 
derived from the data base declaration in the host language program] as the title of the 
description file even if the compiler's DASDL file has been equated to some other title. The 
purpose of this note is solely to document this situation. Unfortunately, the problem cannot 
be circumvented without preventing the compilation of the INQUIRY program. 

D348 8 UTIL - ROW SELECTION CRITERIA 

Row selection criteria for the <copy selector;., <row selector>, and <dump selector> options may 
be specified only once. A syntax error is now given for multiple specifications of the same 
criterion. The DMSII Utilties and Operations Guide (Form No. 5001803) has been altered as 

fol lows : 

On Page 4-13, the syntax for the <copy statement) now reads as follows: 



<copy selector> 
< 



AND 



<- & 



-/1\- FAMILYINDEX — = — <range> 

-/1\- ROW — = — <range> 

~/l\- PACKNAME — = — <family name>- 



) "I 



On Page 4-17, the syntax for the <dbdirectory statement) now reads as follows: 
<row selector) 

< AND 

<- & —I 



( 



-/1\- FAMILYINDEX — = — <range> 

-/1\- ROW — = — <range> 

-/1\- PACKNAME — = — <family name> 

I < , 

-/1\- ROWLOCK — = /1\- LOCKEDROW 

-/1\- READERROR 



) 
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< AN D 

<- & — 



PAGE 268 



- ( 



-/1\- FAMILYINDEX — = — <range> 

-/1\- ROW — = — <range> 

~/l\- PACKNAME — = — < family name>- 



) —I 



on Page 4-30, the syntax for the (recover statement) now reads as follows: 
<row selector) 

< AN D 

|<- & 



( 



-/1\- FAMILYINDEX — = — <range> 

~/l\- ROW — = — <range> 

-/1\- PACKNAME — = — <family name> 

I < t 

-/1\- ROWLOCK — = /1\- LOCKEDROW 

-/1\- READERROR 



) "I 



D3571 UTIL - TAPE "SERIALNO" SPECIFICATION 

UTILITY now accepts unquoted strings of six characters or less in dump tape serial number 
specifications. In addition, either double (") or single (') quotes may be used to delimit 
tape serial numbers. As before, tape serial numbers may contain only <letter>s and <digit>s. 

The <string6> specification on page 4-11 of the DMSII Utilities and Operations Guide (Form No. 
5001803) should be modified as follows to reflect these changes: 

<s t r ing6> 

Syntax 



-/6\ <letter> 

I — <digit) - 



Semant i cs 

<string6) is a group of from 1 to 6 <letter>s and <digitS)S, optionally enclosed within quotes. 

<string6) is used in UTILITY to designate dump tape serial numbers. 

When UTILITY is initiated via CANDE, double quotes may not be used to delimit tape serial 
numbers . 
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P2955 UTIL - VERSION TIMESTAMP MISMATCH 

During COPY, the DMTIMESTAMP in the file header was not properly set if the structure name 
started with the letters •CONTROL'. When the data base was accessed after the copy, a version 
mismatch occurred for these structures. This problem has been corrected. 

P2956 UTIL - PRINT TAPE LABELS 

UTILITY and COPYAUDIT wi 1 1 now print tape labels via the ADM EVENT PRINTLABEL mechanism. 
Previously, tape labels were not produced because these programs reverse verified their tapes. 
Now, tape labels are printed as soon as the tapes are opened (unlike normal tapes which have 
their labels printed when closed). 

P2999 UTIL - FAILURE TO RELOAD BEYOND TWO DUMPS 

The following command would fail to load any data from DUMP 3 : COPY/RECOVER FROM DUMP1 , DUMP 2 , 
DUMP 3 . This problem has been corrected. 

P3146 UTIL - OUTPUT HEADER 

UTILITY now correctly displays the time in the header. 

P3192 UTIL - PRINTING CONTROL INFORMATION 

When printing the control information for a compact data set, an INTEGER OVERFLOW will no 
1 onger occur . 

P3193 UTIL - LOWER CASE IN PARAMETER STRING 

UTILITY now accepts lower case alphabetic characters in its input parameter string. 

P3243 UTIL - CORRUPTED DUMPTIME TIMESTAMP 

The timestamp passed from UTILITY to RECOVERY that tells RECOVERY where to start was corrupted. 
Bit 47:1 was being turned on in the following case: 

1. Recover was being done from more than one dump. 

2. A dump other than the first one had a dumptime greater than the earliest dumptime. 
The correct timestamp is now passed. 

P3244 UTIL - ERROR NOT GIVEN FOR INVALID SYNTAX 

The following UTILITY command is syntactically invalid: 

OFFLINE DUMP <data base>/A/= TO DUMPA, <data base>/B/= TO DUMPB 

UTILITY did not generate a error; instead, UTILITY dumped only <data base>/A/=. UTILITY now 
generates a syntax error. 

P3261 UTIL - NO CHECKSUM ON BLOCK ZERO 

UTILITY no longer fails with a spurious checksum error on block of an unblocked standard data 

set. 

P3373 UTIL - "INVALID INDEX" IN "INITIALIZE" 

When generating a "REQUIRED STRUCTURES NOT NAMED" error for INITIALIZE, an INVALID INDEX 
occurred if the data base had 48 or more structures. This problem has been corrected. 

P3389 UTIL - "LIST, WRITE" STATEMENTS 



rge Index Sets or Standard Variable format data sets were printed via a UTILITY LIST or 

statement and the RECORD option was specified, UTILITY failed with an INVALID INDEX. The 

INDEX occurred at 8015400 for index sets and at 83713000 for Standard Variable format 



When la 

WRITE 

INVALID 

data sets. This problem has been corrected. 



P3390 UTIL - "LIST, WRITE" OF BLOCK ZERO 

When block zero of an index set was printed via a UTILITY LIST or WRITE statement and both the 
HEX and RECORD options were specified, UTILITY printed the wrong block. Rather than printing 
block zero, the last available block was printed. 
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P3391 UTIL - "LIST, WRITE" FAIL TO PRINT SOME BLOCKS 

LIST and WRITE statements failed to print some blocks for Index Sequential, Index Random, 
Ordered List, Unordered List and Unordered Data Set structures. When the RECORD option was 
specified, blocks immediately following available blocks were skipped. 

P3392 UTIL - BLOCK LIMITS FOR "WRITE, LIST" 

When block limits were specified in WRITE and LIST statements and block zero was not specified, 
UTILITY failed to work properly. Index Sequential, Index Random, Ordered List, Standard Data 
Sets and Ordered Data Sets were printed correctly only when block zero was selected. 



P3402 UTIL - "FLUSHDB" DEFAULT 

FLUSHDB was only assigned a default value when either the WORKERS 
specified. The default is now set whenever FLUSHDB is not specified. 



or NOZIP options was 



P3403 UTIL 



"BUILDDUMPDIRECTORY" NOT ACCEPTED 



UTILITY was only accepting the abbreviation BUILDDUMPDIR; now 
BU I LDDUMPD I RECTORY . 



t accepts the full command 



P3404 UTIL 



SYNTAX ERRORS 



UTILITY was not strictly enforcing the syntax described in Section 4 of the DMSII Utility and 
Operations Guide. Syntax errors are now produced when incorrect options are specified or the 
same option is specified more than one. 



P3405 UTIL - "DIRECTION" ATTRIBUTE ERROR 

When an IOERROR occurred during a dump to PACK, an 
This attribute error has been corrected. 



attribute error occurred for DIRECTION. 



P3493 UTIL - "COPY ONTO" MAY NOT UPDATE "EOF" POINTER 

COPY = ONTO *= now properly updates the end-of-file pointer. 

P3495 UTIL - WORKERS RESTARTABLE ONLY ONCE 

When UTILITY was restarted, any workers started during that run were given a Halt/Load worker 
recovery file, using the current UTILITY mix number, rather than that of the restarted UTILITY 
run. If another restart were attempted, these workers were not restarted. This problem has 
been corrected. 

P3586 UTIL - VALIDATE BLOCK RANGE FOR "LIST, WRITE" 

When a <block range> was specified for a LIST or WRITE, UTILITY was not: 

1. Making sure the address was valid hex numbers. 

2. Making sure the second <hex block address> was larger than the first. 
A syntax error is now generated if either is incorrect. 

P3616 UTIL - HANDLING OF HYPHENS 

The use of a hyphen is not documented correctly in the DMSII Utilities and Operations Guide 
(Form No. 5001803), as follows: 



Page 4-6: 



"An <identifier> is composed of from I to 17 <letter>s, <digit>s, and hyphens. The 
character must be a <letter>. The last character must not be a hyphen." 



first 



The requirement that an <identifier> not end with a hyphen was not being enforced. Now, 
syntax error is generated if the last character in an <identifier> is a hyphen. 

Page 4-9: 

The syntax for <tape name> should be changed as follows: 

<tape narno 

<1 e t ter> — 



-cdigi t>- 



— / 1 5\— < 1 e 1 1 e r> 

-<digi t> 

- hyphen (-) 



— < 1 e 1 1 er>- 
I -<digi t> — 
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This syntax documents the ability to use a hyphen in a <tape name>, which has been permitted 
but not documented. 

UTILITY INITIALIZE did not work correctly for structures with names beginning with "ALL-". 
When encountering an initialize of such a structure, all structures would be initialized. Now, 
just the specified structure will be initialized. 

P367 3 UTIL - MULTIPLE ROW CONTROL FILES 

When writing a multiple row control file for a dump, UTILITY was repeatedly writing out the 
first row rather than each successive row. Now, each row will be written. 

P3690 UTIL - CHECKSUM ERROR FOR BLOCK ZERO 

Block zero of unblocked DIRECT data sets was being inappropriately checksummed; consequently, 
an incorrect checksum error was generated following a reconstruction of row zero. This problem 
has been corrected. 

P3702 UTIL - DISPLAY NONFATAL ERRORS, WARNINGS 

Previously, only fatal error messages were written to the UTILITY output and displayed. 
Nonfatal error messages and warnings were written to the UTILTY output but not displayed. This 
has been altered so that warnings and nonfatal error messages, as well as fatal error messages, 
are both displayed and written to the output. 

P3704 UTIL - DEADLOCK 

Previously, a deadlock would result if a hard I/O error occurred while writing the control 
file. This problem has been corrected. 

P3705 UTIL - MULTIPLE DUMPWORKER ERROR 

When a dump was taken to multiple tapes, the second dumpworker was receiving an erroneous 
software error in the control file handler. This problem has been corrected. 

P3714 UTIL - RECOVER FAMILY INDEX 

When recovering rows using backup from multiple dump tapes and a destination family index was 
specified, the family index was only being used for the first dump tape. The family index 
placement of the rows on the remaining dump tapes was arbitrary. Now, the destination family 
index specification applies to all the specified dump tapes. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - WFL/COMPILEACR 



D3303 COMPILEACR - CHANGES TO "WFL/COMPILEACR" 

With the advent of re-entrant ACCESSROUTINES code files, the ACCESSROUTINES need not be 
compiled for those data bases which "model" another common data base. This new feature 
required a change to the DATABASE/WFL/COMPILEACR job deck to allow the ACCESSROUTINES to be 
conditionally compiled. To solve the problem more generally, the job deck has been modified to 
accept a list of software items to be compiled. Also, to facilitate the use of re-entrant 
ACCESSROUTINES, the name of the ACCESSROUTINES code file may be specified. This may be 
necessary if ACCESSROUTINES must be compiled with a file title different from the default: 
ACCESSROUTINES/<data base name>. Another change from the 31 release is the addition of 
abbreviations for some of the longer parameter keywords. This makes running of the job deck 
easier. The parameter string to the WFL deck still consists of <keyword>=<value> pairs. The 
syntax and meaning for each keyword is given below. The abbreviation, where there is one, is 
the underlined portion of the keyword. 

DB = <data base name> 

This specifies the data base for which DMS software is to be compiled. This name is used 
to build the description and code file titles. 

SOURCE = <pack family> 

This specifies the pack family where the DMSII system software resides: i.e., the 
DATABASE/= and SYSTEM/= files. 

OBJECT = <pack family> 

This specifies the pack family where the generated code files are placed. 
DESCRIPTION = <pack family> 

Specifies where the description file resides. 

AUDIT = SET or RESET 

Set for audited data bases. 

SUBSYSTEM = <global memory subsystem identifier 

Enables created code files to run in the proper subsystem. 
PARTITIONS = SET or RESET 

Set if partitioned structures exist. This forces the compilation of PARTITIONCONTROL, 
unless an explicit compile list is given which excludes PARTITIONCONTROL. 

INITPARTITIONS = SET or RESET 

Set to initialize partitions using DMCONTROL. 
INITIALIZE = SET or RESET 

Set to initialize all data base files using UTILITY. 
ACR = <file title> 

Specifies an ACCESSROUTINES code file title if different from the default 
ACCESSROUTINES/<data base name>. 



-- COMPILE — = <software name> 1 

This allows the explicit specification of the software items to be compiled. Valid 
<software name>s are: 

ACCESSROUTINES OR ACR, UTILITY, RECOVERY, 
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DATARECOVERY, RECONSTRUCT, PARTITIONCONTROL, MONITOR 



Example : 

START DATABASE/ WFL/COMP I LEACR( "DB=TESTDB OB=DEVELPK C=RECOV, DATAR, 

RECON INIT=SET") 

This set of parameters to the job deck causes the compilation of RECOVERY, DATARECOVERY, AND 
RECONSTRUCT for a data base "TESTDB" whose description file is DESCRIPTION/TESTDB. The created 
code files will be placed on "DEVELPK" . All the data base files will be initialized using 
UTILITY. 

D3478 COMPILEACR - ADD COMPILE "MONITOR" FUNCTION 

The DATABASE/WFL/COMPILEACR WFL deck can now be used to compile the data base monitor program 
by specifying "MONITOR" or "MON" in the compile list parameter to the deck. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - WFL/COMPILEACR 



P3619 COMPILEACR - HYPHENATED DATA BASE NAMES 
Hyphenated data base names are now handled correctly. 
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PAGE 27 5 



three things depending on the 
If no option is specified, no 
"VERIFY" is specified, then 
skaudit option> "COPY TO TAPE 
verify the audit, copy it 



be started by either the 
COPYAUDIT directly, but will 
declared in DASDL, the name 

f DATABASE/ WFL/COPYAUDIT will 
automatically start the WFL 
to be used to run COPYAUDIT, 

This subsystem is specified 



D3270 WFLCOPYAUDIT - IMPLEMENT "COPYAUDIT WFL" DECK 

Currently, at audit file switch time the ACCESSROUTINES do one of 
option specified when the audit trail is declared in DASDL. 
action is taken. If the <diskaudit option> or <tapeaudit option> 
the COPYAUDIT utility is zipped to verify the audit. If the <di 
AND REMOVE" is specified, then the COPYAUDIT utility is zipped to 
from disk to tape, and remove it from disk. 

A WFL file has been implemented to run COPYAUDIT. It can 
ACCESSROUTINES or the user. The ACCESSROUTINES will no longer zip 
always zip this WFL job to run COPYAUDIT. When the audit trail is 
of this WFL job can be specified; otherwise, the default title o 
be used. At the completion of each audit file, the ACCESSROUTINES 
job passing it two string parameters. One is the parameter string 
and the other is the subsystem in which COPYAUDIT should be run. 
in DASDL using the $ SUBSYSTEM option. 

This feature offers the following advantages: 

a In the WFL job, a CLASS, FAMILY, PRIORITY, USERCODE, etc. can be specified to ensure that 
COPYAUDIT is inserted in the proper queue, finds the necessary files, and runs at the 
des i red priority. 

b If an error occurs which prevents COPYAUDIT from running successfully, the WFL job will 
offer the option of retrying the COPYAUDIT run or terminating the job. If the job must be 
terminated, then the WFL job may be restarted after the errors have been reso ved The 
parameters used by the ACCESSROUTINES to zip the WFL job are displayed, so that the WFL job 
may be restarted using the same parameters. 

The following syntax replaces that in the DMSII DASDL Reference Manual (Form No. 5001480), 
Pages 4-20 through 4-22: 



AUDIT TRAIL 



( <audit trail attributes> ) 



- ATTRIBUTES 



< audit trail attributes> 

I < , 

-/1\- AREAS = <unsigned integer> 

-/1\- AREASIZE = <unsigned integer> 



- BLOCKS 



-/1\- BLOCKSIZE = <unsigned integer> 

SISGMENTS 
WORDS 



/1\- CHECKSUM 

- = FALSE 

- = TRUE - 
-/1\- DUPLICATED 

|- ON <secondary audit media> 

_/l\-<pr imary audit media> 

_/l\ UPDATE EOF = <unsigned integeo -- -— 

- UPDATE-EOF -| |- 



BLOCKS - 
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<primary audit media> 
— — KIND = — TAPE - 

- TAPE7 

- TAPE9 

- PETAPE 
DISK - 

- KIND = -I 

- DISKPACK 

- PACK | | 

I <; 

/1\- KIND = DISKPACK — 

|- PACK 

/1\- PACKNAME=< family name> 



-<tapeaudit option>- 



<f ami ly name> 



|-<diskaudit option>- 



<secondary audit media> 
TAPE 



- TAPE7 — 

- TAPE9 — 

- PETAPE - 

- DISK 

- DISKPACK 

- PACK 



-< tape audi t opt ion> 



<fami ly name) - 



I -<di skaudi t option>- 



<diskaudit option> 

I < t 

/1\_ ALTERNATE TAPE 



IS 



-/1\ <verify option>- 

|-<copy option> 



- TAPE7 - 

- TAPE9 - 

- PETAPE 



<tapeaudit option> 

I < f 

/I\- DESIGNATED <serial number s> 

|-/l\-<verify opt ion> 
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<serial number s> 

<unsigned integer> TO <unsigned integer> 

|- <string> TO <string> 



<verify option> 

— VERIFY 

- JOB < f i 1 e t i 1 1 e > 



<copy opt ion> 

— COPY TO TAPE 

TAPE7 — 
TAPE9 — 
PETAPE - 



and remove: 



- 1 TIMES - 

- 2 TIMES - 



- JOB <file title> 



<file title> 
— <f i le naine>- 



ON < family name> 



B6000 SERIES MARK 3 2 RELEASE 05 NOVEMBER 19 80 DMS II - WFL/COPYAUDIT 



PAGE 27 8 
B6000 SERIES MARK 32 



DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - TRANSACTION PROCESSING 

D3334 TPS - "TPS" REVISION 



The Transaction Processing System document released with the Mark 31 system notes has heen 
revised for the Mark 32 release. See Appendix C, "Transaction Processing System" for detaHs 
Revisions are indicated by PCN bars in the right margin. ' ' details. 

D3419 TPS - UPDATING FROM "31" TO "32 TPS" 

A transaction base and its data base need not be updated to Mark 32 concurrently A Mark 31 
transaction base may access a Mark 31 or a Mark 32 data base. A Mark 32 transaction base may 
SaJabase eSS * ^^ baSC - N ° tC * hat * Mark 32 "*"**<=' >°" base may not access a Mark 31 

A transaction base and the MCP may be updated to Mark 32 software independently. Mark 32 TPS 
may be used with the Mark 31 MCP and Mark 31 TPS may be used with the Mark 32 MCP. 

Because of the changes made to port files on the Mark 32 MCP, special restrictions apply to the 
lS?pJf-r^«fJ y e H ? S k Inter ? ace - F ° r thi * release only, Mark 31 Remote Libra" ana Host 
Interface software may not be compiled or run on the Mark 31 MCP. Installations which do not 
use the Remo e Library and Host Interface software are not bound by this restriction Th?s 
limitation will not exist on future releases. restriction. this 

The following procedure may be used to update to the Mark 32 TPS release. 

'■ u^ngTfbtaTM^n^nanc^ 31 ^ 80 "^ 6 ' trdeSCripti0 " flle " d "•"■ S ° ft — "> <*** 

2 ' Maintenance' 10 "' y ° U may C ° Py thE TPS COntr0 ' fileS a " d J° urnals to tape using Library 

3 ' Ma?k 'it *"£ ^, T !!!V 0ftWar £ a " d P erfo ; m EJ- update. In order to ensure an easy return to 
" „ 3, ' w d ? not make a "y changes to the TFL description of the transaction base during the 
compiled. " B SUCCeSsful "Pdate, Mark 32 system software will automatical"* be 

4. User programs will continue to run on Mark 32 without being recompiled. 

TIl 6 ^ '™'!! 8 P roce ? ure may be used to return to Mark 31 software provided no changes were made 
to the TFL description of the transaction base during TFL update. " 

1. Reload the Mark 31 TFL source, t rdescr ipt ion file and system software from tape. 

'• b: e fir5 r ?S:;"-S°TS"wlth , |torll'31 » g «-P"»- «" ». recompiled with Mark 31 compilers 

The following D-Notes contain information which is especially useful for conversion to Mark 32 

a. TRANSACTION PROCESSING D3334 

TPS documentation has been enhanced and revised for Mark 32. 

b. HOSTLIB D3367 

The Transaction Library now allows simultaneous read/write access to transaction journals. 
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DMS II - TFL 



D3319 TFL - COMMENTS IN TRANSACTION BASES 

Comments can be included when a transaction base i s described in JFL. This descHp 
information is stored in the transaction base description file. When a COBOL program invoK 
?ansac on base the comments are listed with each transaction format and transact. on b 
For ALGOL and PL/I programs, transaction formats, transaction items and comments are li 
when the LISTDB dollar option is set. 

Comments must be enclosed in quotes and may be at most 255 characters in length Comments 
be orovided for transaction formats and transaction items. For transaction formats, 
cS-nS" i«? immediately follow the keyword FORMAT; for transaction items, the comment 
immediately follow the item name. 

Syntax : 

<transaction format> 

— < format name> FORMAT -- - > 

- TRANSACTION - |- " <comment> " -| 



1 1 ve 
es a 
ase . 
s ted 



may 

the 

mus t 



>-<record descr ipt ion>- 



<group item> 

— <group item name>- 



GROUP — ( — <item list> > 



<comment> " 



>- ) 



-<occurs option>-| 



<data item> 

<alpha item> 

-<bool ean i t em>- 
-<number i t em> — 

-<real i tem> 

-<field item> 



/l\-<occurs option> 

-/1\— < ini t i a 1 value option>- 



<alpha i t em> 

— <alpha item name>- 



ALPHA — ( — <integer>- 



<comment> 



>- ) 



- SIZE VARYING 

|- WITH — <numeric item name>- 

- SIZE DEPENDING ON — <numeric item name> 



<bool ean i t em> 

— <boolean item name>- 



BOOLEAN — 



< comment > 
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<number i t em> 

— <number item name>- 



NUMBER 



<comment> 



>- ( 



-<integer>- 



S - 



-<integer>-| 
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<rea 1 it em> 

— <real item name>- 



REAL 



(comment > 



-<int eger>- 



) "I 



S - 



-< i nt eger>- 



<f i e Id i t em> 

— <field item name> 

|- " <comment> " -| 

>- ( <integer> 

I < . 

/48\ <bi t name> 

|- " <comment> 
>_ > 



FIELD 



BOOLEAN 



D3320 TFL - CRUNCH "NEWSOURCE" FILE 

N ? W ,n«o rCe fi I eS P roduced b y TFL will now be crunched, have a blocksize of 420, and an areasize 
oi iuuo records. 

D3336 TFL - PARAMETERS NOT SPECIFIED 

TFL now produces an error when a TFL source specifies either a data base parameter and no 

restart data set parameter or a restart data set parameter and no data base parameter. This 

error message has been added to ensure that both parameters are provided if data base 
processing is to be performed. 

Syntax : 



— PARAMETERS 



( <parameter spec> ) — | 



<parameter spec> 

— I — <boolean parameter)- 

- SET 

RESET 

-<numeric parameter) — = ---<numeric literal) 

-/l\-<data base parameter) — , — <restart data set parameter>- 
-/l\-<restart data set parameter) — , — <data base parameter>- 
-/l\-<host system parameter) 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - TFL 

P307 3 TFL - EXPAND TEXT GENERATION ARRAY 

The size of the array in the TFL compiler which holds ALGOL text has been increased to 4095 

words . 
P3194 TFL - ERROR MESSAGE 

The message "ERROR IN FORMAT" is now displayed; previously, "ERROR IN DATA SET" was displayed. 
P3195 TFL - HEADER DISPLAYS CORRECT SYSTEM TYPE 

The header line displayed on output listings from the TFL compiler now displays the correct 

system type. 

P3557 TFL - HYPHENATED "RESTARTDATASET" IDENTIFIERS 

TFL allowed the data base Restart Data Set to be declared in the PARAMETERS declarator. 
Previously" if the <restart data set name> was hyphenated, TFL issued a syntax error. mis 
problem has been corrected. 

P3674 TFL - TABLE SIZE EXCEEDED 

exceeded. This problem has been corrected. 
P3675 TFL - INFINITE LOOP 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - TR INTERFACE 



P3242 TRINTERFACE - CORRECT OFFSET GENERATION 

TR INTERFACE was not generating the correct item offsets within transaction records for items 
within non-occurring groups. As a result, SEG ARRAY errors were given when transaction record 
groups items were accessed. This no longer occurs. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - TRUTILITY 



P3104 TRUTILITY - SEARCH USING ALPHA ITEMS AS KEYS 

TRUTILITY is capable of searching journal files for transaction records which have a lP"if|ed 
™Vue In a data i?e«. If anVlpha item longer than 18 characters were spec.f.ed, TRUTILITY 
would fault with a SEG ARRAY error. This problem has been corrected. 

P3388 TRUTILITY - OUTPUT ENTIRE "RANGE" SPECIFICATION 

. Tiin-u itv lict« »n expanded version of the "RANGE" specification it 

been corrected. 
P3715 TRUTILITY - COMPILATION FAILS WITH SYNTAX ERROR 



been corrected. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - HOSTLIB 



D3085 HOSTLIB - RETURN ADDRESS OF LAST USER TRANSACTION 



A new entry point, RETURNLASTADDRESS , has been provided which returns the address (file, blocl 
offset) of the last transaction to be either tanked or processed by a transaction user Tr 
declaration for the new entry point is the following: 



:k, 

The 
ry point is the following: 

INTEGER PROCEDURE RETURNLASTADDRESS (FILENUM, BLOCKNUM, OFFSET, IDNUM)- 
REAL FILENUM, BLOCKNUM, OFFSET; INTEGER IDNUM. 

IDNUM must represent an active transaction user for this program. The address is returned in 
the three parameters: FILENUM, BLOCKNUM and OFFSET. This entry point allows transactions to be 
easily detanked. For example, RETURNLASTADDRESS could be called after tanking one transaction 
and called again after tanking is complete. SEEKTRANSACTION can be used to reposition the 
journal at the first tanked transaction. 

D3 367 HOSTLIB - SIMULTANEOUS "READ/WRITE" ACCESS 

The TRANSACTION LIBRARY now allows simultaneous READ/WRITE access to transaction journal data 
files. As a result, the semantics of the READ USEROPTION parameter of the OPENTRBASE library 
entry point have been changed as follows: 

USEROPTION=READ (4) 

Allows any other process to open a journal when this USEROPTION is chosen. The other 
processes can use any value for USEROPTION they choose; thus, READers can simultaneously 
process against the same journal as Updater's, Inquirer's, Tanker's and Exc lus i veupda t er ' s . 

In addition, a new exception has been added to the "Attention" group, as follows: 

Exception #36: 

Last call to READTRANSACTION resulted in a non-fatal error. 

D3454 HOSTLIB - NEW STATISTICS 

Three statistics have been added to provide information regarding data base ABORT and HALT/LOAD 
recovery, which come under two categories: ABORT statistics and Transactions Reprocessed. 

ABORT statistics describe the number of ABORTs that have occurred and the average ABORT 
recovery time; they are only produced if at least one ABORT has occurred. 

The statistic describing the number of reprocessed transaction is always produced and is a 
cumulative total of all transactions reprocessed during a single session. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - HOSTLIB 

P2864 HOSTLIB - CHECK FOR UNASSIGNED TRANSACTION FORMATS 

Properties of unassigned transaction formats are no longer included at compile time. 
P3749 HOSTLIB - "I/O" COMPLETE 

When a new journa. f i 1 e . i s . created, a -J-J" «»»K^i.:i; h So^ver^He'rc suit 'if ' the'sys *t£ 
to the new file beginning at "P" 1 ' e ' /' i°° „ might go undetected. This 
transaction I/O was not examined; consequently, an I/O tailure migni go 

problem has been corrected. 
P3780 HOSTLIB - WRITE ERROR 

If.:,:;!:: ",r n:"^,Sl".5S'Kt:'!s.'s:!:'.:M:iM::r 'K:::;i-s.Tf,.=^r!-..iS 

negative number. This problem has been corrected. 
P3 7 94 HOSTLIB - DISCONTINUITY OF BLOCK SERIAK NUMBERS 
Previously, if multiple TANKERS or "^^he^ETURNRElTARTINFo'en^rpo": , T*\o*A serU. 
:SKS? t iT:.oi??i:?U--o"2 ^rc^alerirlltnei^hfffiER-s or UPDATER^ journal file. This 
problem has been corrected. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - REMOTELIB 



D32 30 REMOTELIB - ELIMINATION OF RESPONSE FROM PORTS, SIGNALS 

T ^ ££»R° nSe J r £9V.i^ ed specification of the PORTS and SIGNALS syntax has been eliminated from 
all READS and WRITEs to PORT files in both the REMOTELIB and HOSTINTERFACE eliminated from 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - REMOTELIB 

P2881 REMOTELIB - ELIMINATE UNUSED REQUESTCASE VALUES 
Both the REMOTELIBRARY and HOSTINTERFACE have been modified to eliminate "Request case " values 
which have never been used. 

P3707 REMOTELIB - USE PORT FILES 
The Remotelibrary and Hos t i nt e r f ace have been changed to utilize Mark 32 port files. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
DMS II - HOST INTERFACE 



P2775 HOSTINTFACE - SEND ENTIRE RESTART RECORD 

HOSTINTERFACE now ensures that the entire restart record, which it received from REMOTELIBRARY, 
is sent to HUalLiBKARY along with its user transaction. 

P2881 HOSTINTFACE - ELIMINATE UNUSED REQUESTCASE VALUES 

Both the REMOTELIBRARY and HOSTINTERFACE have been modified to eliminate "Reques tease " values 
which have never been used. 

P3350 HOSTINTFACE - ELIMINATE "PORT" OPTION 

The PORT option has been eliminated from Programdump statements. 
P3707 HOSTINTFACE - USE PORT FILES 

The Remotcl ibrary and Hos t i n t er f ace have been changed to utilize Mark 32 port files. 
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DOCUMENT CHANGES NOTES (D NOTES) 
DMS II - TRPROPERTIES 



D3321 TRPROPERTY - CRUNCH "TRBASE/PROPERTIES" SYMBOLIC 

The new symbolic file produced when TRBASE/PROPERTIES is run will now be crunched, have a 

blocksize of 420, and an areasize of 1008 records. 
D3322 TRPROPERTY - "TASKVALUE" ATTRIBUTE 

The TASKVALUE attribute of TRBASE/PROPERTIES is now 1 if the program terminates normally and 
if the program terminates abnormally. 
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DMS II - TRPROPERTIES 



P2889 TRPROPERTY - INCREASE NUMBER OF FILES IN JOURNAL 

lontrnl 6 fi il^ - lle Dn " b " J ields . has been increased in transaction records, in the journal 

?he TO NTERfIcE n™™"^"^? '{ • ?" *"** < containe <» j " ">* HOSTLIB cal 1 ed 'cFUSER NFO) J an5 tn 
tne iKlNlbKr'ACE program, so that file numbers up to 9999 will be accepted. 
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D3335 DATADICT - DATA DICTIONARY 



There is a documentation file on the SYSTEMNOTES tape named DATADICT/DOCUMENT, which contains 
information regarding the implementation of the Data Dictionary. 

This file may be printed by using the commands described in GENERAL note D3205 . 
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DMS II - DDDASDL 

D33 27 DDDASDL - ADD VERSION LEVEL 
The DASDL source for the Data Dictionary system now includes a version card 
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D3149 DDUPDATE - REFORMAT DATADICTIONARY REPORTS 
The reports generated by the DATADICTIONARY have been reformatted. 
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D3011 DUMPALL - UPPER CASE INPUT STRING 

The input string to DUMPALL will now be translated to UPPER CASE before any processing takes 
place. 
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P3468 DUMPALL - "PACK=<PACKNAME> " SYNTAX 

DUMPALL did not scan "PACKNAME=<packname> " correctly in the verbs LIST and COPY and in the 

<device to device> routines. In some cases, DUMPALL did not accept "PACK=<packname> without 

delimiting blanks around the equal sign. In other cases, the "PACK=" syntax was totally 
ignored or completely rejected by DUMPALL. 

This problem has been corrected; DUMPALL now scans and process "PACK=<packname> " syntax 
properly for all verbs. 

P3504 DUMPALL - BAD "COPY" SYNTAX NOW FLAGGED 

DUMPALL did not flag 'COPY" syntax errors, but punched cards as output instead. 

Ex amp 1 es : 

COPY FILE1 AS JUNK TO DISK 
COPY FILE1 TO WHAT 

This problem has been corrected; DUMPALL now flags COPY syntax with the error message 
"UNRECOGNIZED DEVICE KIND" . 

P3 505 DUMPALL - LIST WITH "< MANUAL INPUT> " , " <PACKNAME> " 

Using the LIST verb with <manual input part> and <packname> specification now works properly. 
Previously, this combination failed with an "ATTR I BUTE ERROR" and "DIVIDE BY ZERO" error. 

P3537 DUMPALL - "DUMPALL" OVERRIDES "ON PACKNAME" 

DUMPALL now checks if the input string contains any "ON PACKNAME" specification for DPK or DSK 
routines and sets the familyname to this specification. If there is no ON PACKNAME 
specification, DUMPALL assigns "PACK" as the familyname for DPK routines and "DISK" for DSK 
rout ines . 
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DUMP ANALYZER 



D3012 DUMPANALY - ANALYZE "IOCB" 

The analysis of the IOCB has been expanded. 

D3013 DUMPANALY - ANALYZE "FIB" AT ADDRESS 

New syntax has been added to tell DUMPANALYZER to as 
address and analyze it. 



iume that a FIB starts at an arbitrary 



Syntax : 
— FIB - 



AT - 



- HEX 

- OCT 

- DEC 



-<simple address>- 



The FIB specified at address <simple address> is printed. 
D3019 DUMPANALY - "REPEAT" SYNTAX IN "INTERACTIVE" MODE 
The following syntax now exist: 

— REPEAT | 

PRINTER -| 

TO - 



REPEAT causes the last command input to be repeated. If PRINTER is specified, the output goes 
to the printer. 

D3136 DUMPANALY - PRINT INTERACTIVE INPUT 

When running the interactive version of DUMPANALYZER and invoking the PRINTER option, 
DUMPANALYZER would dump the analysis to the rinter but not the command which caused the 
information to be dumped. It now dumps the command to the printer also. 

D3I37 DUMPANALY - DUMP "UNITMAP" 

A new procedure called PRINTUNITMAP prints and analyzes the UNITMAP entry for each unit. In 
addition, PRINTUIOERR analyzes UNITIOERR. 

D3138 DUMPANALY - PRINT FILE BUFFERS TEXT 

The text contained in buffers is now printed unconditionally, if the FIB is being analyzed. 

D3139 DUMPANALY - ANALYZE "UNITCONTROL" 

DUMPANALYZER can now analyze the UNITCONTROL array of the PHYSICALIO module in response to the 
"IOUNIT" command. 



D3292 DUMPANALY 



"OLAYINFO" ANALYSIS 



The interactive DUMPANALYZER now analyzes the overlay-file allocation. It finds all the 
descriptors to present or absent overlayable data, checks for overlapping allocation or other 
errors, and compares them with the OLAYINFODESC bit vectors. 

Syntax : 

— OLAYINFO I 



|-<s t ack>- 



|-<olay add>- 



If <stack> is present, only the specified stack's OLAYINFO is analyzed; otherwise, all stacks 
are shown. If <olay add> is present, overlay allocations neighboring <olay add> are shown. 
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This syntax is also available via the HELP command. 

D3417 DUMPANALY - "PROC" COMMAND IMPLEMENTED 

The PROC command of the DUMPANALYZER may be used to control the resolution of address not in 
global memory. 

Synt ax : 

— PROC 1 

| -<number>- | 

D3442 DUMPANALY - ANALYZE LIBRARY TEMPLATE 

Key information in the library template for DUMPANALYZER is now printed out. 

D3479 DUMPANALY - MODULE ALTERNATIVE SELECTION 

DUMPANALYZER uses the information passed via the MCP procedure TAPEDUMP to select the BINDINFO 
data for the selected module alternatives. The names of the selected alternatives are now 
displayed by the OPT command (or in the options section of a non-interactive dump). 

D3481 DUMPANALY - NEW PORT ANALYSIS 

The DUMPANALYZER now analyzes 32 ports. The analysis happens whenever FILES mode is set as 
part of the expansion of the file. Additionally, a new command has been added to the 
DUMPANALYZER to allow selective expansion of ports: PRINTPORT. 

Syntax : 

— PRINTPORT — <portindex> — | 

This syntax is also documented within the DUMPANALYZER HELP 

inf ormat ion . 

D3588 DUMPANALY - NEW "MODE" "PIB" OPTION 

A new MODE option, PIB, has been implemented for the DUMPANALYZER. When PIB is set arrays 
which have an unusual field of PIB mark in their memory links will be analyzed and displayed as 
PIBs. 

D3 5 89 DUMPANALY - "SAVE" COMMAND 

The semantics of the non-interactive SAVE command have reverted to their pre-Mark 31 state; 
i.e., when "SAVE <filename" is entered, DUMPANALYZER will save the dump information on disk and 
exit. No further analysis will be performed. 

A new command, "SAVEANDGO <filename>" has been implemented. This command causes DUMPANALYZER 
to save the dump information on disk as above, and then do any additional analysis as specified 
by other options. 

D3612 DUMPANALY - ANALYSIS OF "MLIP I/O" DATA STRUCTURES 

The DUMPANALYZER now recognizes MLIP type data structures (B6900) and analyzes them in a manner 
analogous to MPX data structures given the same commands. 

D3643 DUMPANALY - ANALYZING AREA DESCRIPTOR 

DUMPANALYZER would sometimes die when analyzing an area descriptor with a large value in the 
length field. 

On the Mark 32 system software release, the semantics of the batch mode FILES command has been 
changed. FILES now always causes the contents of the buffers to be printed and analyzed. The 
option BUFF has been removed. 

Also on the Mark 32 release, setting the mode FIB in the interactive mode causes the buffers to 
be dumped and analyzed. 

On both the Mark 32 and Mark 31 PR2 releases, whenever the buffers are dumped and analyzed, 
only the first and last 250 words of a large (greater than 500 words) buffer will be printed. 
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P2779 DUMPANALY - BAD PRINTER SKIP 

Near the end of the output from a non-interactive Mark 31 dump analysis with AREADUMP set, the 
printer may slew and/or drop ready because of improper carriage-control specification in the 
memory statistics summary. This problem has been corrected. 

P27 80 DUMPANALY - RUN " DUMPANALYZER " IN "EBCDIC" 

DUMPANALYZER now runs in EBCDIC rather than BCL. During the course of this change a few 
corrections and modifications were made; these are detailed below except for occasional 
self-evident changes in the formatting of output. 

Operands in a stack dump are no longer displayed in BCL by default; this feature may be invoked 
by setting the BCL mode (but not ALL). The interactive command PV . . . BCL functions as before, 
and if the buffers for a BCL-mode file are printed, BCL graphics are still shown. 

The heading page has been somewhat reorganized for readability. 

The convention that hex numbers are shown with leading digits and decimal numbers without 
leading digits is now followed in all cases, except display of times (e.g., 02:07:45). 

In an areadump, areas whose mom descriptors occur in a stack are shown, for example, as 
MA=07F07 003C IN STK 09A. In the Mark 31 DUMPANALYZER, the stack-relative offset (e.g , 003C) 
was incorrectly being shown as merely the last four hexits of the mom address; this has been 
corrected. Also, moms in the MCP stack are shown relative not to the stack base but to D[01 • 
they are now so marked: for example, MA=0230E D0+20E STK 001. 

The display of un-stuffed Indirect Reference Words in stack was occasionally wrong if they 
appeared above an inactive MSCW between active MSCWs at differing lex levels. This problem has 
been f i xed . 

P2797 DUMPANALY - CORRECT "ID" INITIALIZATION 

Under some circumstances, DUMPANALYZER could get an INVALID INDEX at line 13430000 while 
loading "LINEINFO/NAMES" ; it would display the fault and proceed without the MCP DO names. The 
error has been corrected. 

P3061 DUMPANALY - "MD RV <ADDR> FOR ALL" CORRECTION 

The DUMPANALYZER was not correctly calculating the number of words to display when the FOR ALL 
and the RV options of the MD command were used to print a descriptor of other than SZF=0. This 
problem has been corrected. 

P33 53 DUMPANALY - REMOVE PORT, "SIGNAL" CODE 

The DUMPANALYZER no longer analyzes old style ports and signals. 

P3 361 DUMPANALY - "SAVE" LARGE DUMP 

DUMPANALYZER could not correctly SAVE and later reload a large dump; the LINEINFO dictionary 
was corrupted if the saved file exceeded 65535 segments of disk. The problem has been 
cor rec t ed . 

Dump files SAVEd with an earlier DUMPANALYZER are not compatible with the corrected 
DUMPANALYZER, and vice versa. 

P3396 DUMPANALY - HEADING DATE FOR DISK INPUT 

The heading produced by DUMPANALYZER from a dump file that had been pareviously "SAVED" had an 
incorrect date. The day part of the date was always "1". This has been fixed. 

P3429 DUMPANALY - PROCESSOR LOOP AFTER "?END" 

The DUMPANALYZER will no longer go into an infinite loop after a ?END is entered while the 
program is executing a command which has no output. 

P3430 DUMPANALY - "HOSTINFO" DEIMPLEMENTED 

The interactive DUMPANALYZER command "HOSTINFO" has been de impl ement ed , as it is not relevant 
to Mark 32 Ports . 
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03 601 ESPOLINTRN - DELETE OLD INTRINSICS 

Since XALGOL is no longer supported, the intrinsics and the BINDER references have been 
del e ted . 

The old BASIC intrinsics have been deleted, since the codefiles which reference these are no 
longer supported. 
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P2933 ESPOL1NTRN - CORRECTLY HANDLE "BASIC" STRINGPOOL END 

Previously, the intrinsics would get a SEG ARRAY error if a string exceeded the string pool 
size by less than 6 characters. The intrinsics now handle this situation correctly. 

P3042 ESPOLINTRN - FREEFIELD INPUT WITH COMPLEX "ALGOL" 

When an ALGOL program read a value into a complex variable with freefield input, the imaginary 
part was rounded to an integer. This problem has been corrected. 

P3299 ESPOLINTRN - "ALGOL" POINTER "I/O" 

The construct "WRITE(F, * ,PA) " or "READ(F, ♦ , PA) " , where PA is a pointer, could cause a fatal 
error. These constructs are now handled correctly. 

P3300 ESPOLINTRN - UPDATE "B7000" DEFINE 

The ESPOLINTRINSICS will now correctly determine that the system on which the program is 
running is a B7000 series system. 

P3 309 ESPOLINTRN - ARRAY ROW FREE FORMAT READ 

Free Format array row READs on a character type array no longer cause a SEG ARRAY error. This 
problem was caused by erroneous calculation of the record size if the parameter passed were a 
non-indexed string descriptor. 
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D3020 FILECOPY - "TASKFAULT, CLASS, OLDWFL" FEATURES 

New options have been added to FILECOPY, as follows: 

TASKFAULT: 

The use of this option will cause an "ON TASKFAULT, GO TO THETOP;" statement to be 
added to the task's output WFL deck. With the corresponding label "THETOP:", any 
abnormal termination (including operator DS) will cause the task to restart. This 
option is reset by default and will cause no changes in the current format of the 
output WFL deck. This option must be fully spelled out; i.e., it has no minimum 
abbreviat ion. 

CLASS: The use of this option alows the specification of the CLASS statement in the output 
WFL deck. If the CLASS option is not used, the WFL deck will inherit the CLASS of 
the SYSTEM/FILECOPY which created it. This option must be fully spelled out; i.e., 
it has no minimum abbreviation. The numeric value that follows it must be within the 
range of - 1023. 

OLDWFL The use of this option will cause FILECOPY to create "OLD WFL" output decks which 
will allow quoted file titles. WFL (as opposed to pre-29 WFL) will not allow any 
characters in a file title other than letters and numbers, hyphens and underscores; 
the use of quotes is not allowed. The use of a hyphen and/or an underscore in a file 
title will cause FILECOPY to quote the title only if "OLDWFL" is set. For FILECOPY 
task requests that do not use the "OLDWFL" modifier, files that violate the title 
syntax will be reported on the summary report and will not be copied. The use of the 
"OLDWFL" modifier precludes the use of the modifier "TASKFAULT" which uses WFL 
features not supported in pre-29 WFL. 

Note: Eventually, OLDWFL will no longer be supported; its use should be curtailed. 

As a result of these new options, the syntax diagram on Page 1-1-5 of the SOG Reference Manual, 
Volume 2 (Form No. 5001688) should now read as follows: 



- EXCLUDE FILEKIND ( <filekind> ) 

- PARTITION ( <letter><hyphen><letter> ) - 

- INDEXLABEL <filename> 

- DECKLABEL — | |-< family part> 

- LOCKINDEX 

- NOSUMMARY 

- COMPARE 

- BACKUP 

- PUNCH 

- REMOVE 

- LOCKDECK 

- NOZIP 

- SFACTORZERO 

- SYNTAX 

- CLASS — <integer> 

-/1\ TASKFAULT 

- OLDWFL 
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P3201 FILECOPY - "* = " FILE REQUESTS 

FILECOPY will now handle the following requests with the same results: 

FILE (= FROM DISK) 

EXCLUDE (USERCODE/= FROM DISK) 

FILE (*= FROM DISK) 

Both requests will result in only "SYSTEM" files (non-usercode) being selected. Please note 
that the "*=" request will use much less time and system resources. 

P3220 FILECOPY - "EXCLUDE USERCODE/=" 

FILECOPY will now handle the following in the same way: 

EXCLUDE (USERCODE/=) 

and 

EXCLUDE (=USERCODE/=) 

P3431 FILECOPY - "WFL" DECK SEQUENCE NUMBER LIMIT 

FILECOPY will now correctly generate its WFL output files with sequence numbers incremented by 
100 within a task. A task may now use up to 16,384 lines instead of the old limit of 4095. 

P3432 FILECOPY - "NULLFILE" VALID FILEKIND 

FILECOPY will now accept "NULLFILE" (VALUE=0) as a valid filekind in an EXCLUDE <filekind> 
statement . 

P3433 FILECOPY - "INCLUDE" DOES NOT "EXCLUDE" AUTOMATICALLY 

If a file meets the request criteria to be copied and is also in an INCLUDE list, it would be 
copied to the output media twice. This problem has been corrected by causing a file in an 
INCLUDE list to be EXCLUDEd automatically. 

P3434 FILECOPY - LOOP ON INVALID SYNTAX 

FILECOPY will no longer loop giving syntax errors when extra commas or missing parentheses 
occur in FILE, EXCLUDE and INCLUDE statements. 
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P3158 FILEDATA - HANG ON "NO FILE" 

Under certain circumstances, FILEDATA' s GETSTATUS call could indicate no errors but return no 
files to be procssed; subsequently, this would cause a wait for NO FILE JOB <mix #> . This 
condition is now detected and reported as the error "NO FILES VISIBLE". 

P3159 FILEDATA - VALID REQUESTS REJECTED AFTER FIRST ERROR 

Multiple requests to FILEDATA may be input by separating them by a seimcolon; however, when an 
error was encountered in one request, all the following requests were discarded, even though 
they might be valid. This has been corrected; now, each request will be processed 
independent ly . 

P3160 FILEDATA - INCORRECT INDICATION OF "IAD" DUSK 

The AREA LAYOUT OF FILES report incorrectly indicated that files with an odd numbered AREACLASS 
resided on IAD disk. The correct bit in the file header is now tested. 

P3506 FILEDATA - REPORT ON "5N" DISK 

FILEDATA now properly reports on 5N disk. 

P3507 FILEDATA - "4-DIGIT" SERIAL NUMBERS 

In the heading of FILEDATA, only 3 digits were being printed for the system serial numbers. 
They have been expanded to 4 digits. 

P3508 FILEDATA - SHOW LAST FILE IN "CHECKERBOARD" 

The CHECKERBOARD command now shows the last file at the highest address. 
P3509 FILEDATA - "FILEORGANIZATION" ATTRIBUTE 

FILEDATA now properly reports the FILEORGANIZATION of a file. 
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D3004 FORTRAN - "NEWTAPE" WITH "UNITS=CHARACTERS" 

UN ITS CHARACTERS should not be specified for the compiler's NEWTAPE file. The following 
paragraph should be added to the FORTRAN Reference Manual (Form No. 5001506), at the bottom of 
Page 18-3: 

•Note: If the attributes UNITS or MAXRECSIZE are file equated in the compiler files, the 
compiler input/output will be undefined." 

D3005 FORTRAN - "MOD" OPERATOR WHEN SECOND ARGUMENT <1 

Add the following to the FORTRAN Reference Manual (Form No. 5001506), after the second 
paragraph on Page 15-13: 

"In the intrinsics "MOD" and "AMOD" , for the second argument <1, the results of the "MOD" 
operators are undefined by the current implementation." 

D3006 FORTRAN - "ERRORFILE" CONTAINS GARBAGE 

Add the following to the FORTRAN Reference Manual (Form No. 5001506) to the description of 
ERRLIST, Page 19-7: 

"The compiler ERRORFILE file should be equated to printer or remote only; otherwise, it may 
contain unexpected characters." 

D3021 FORTRAN - INTRINSIC AS ACTUAL ARGUMENT NOT ALLOWED 

An intrinsic name cannot be used as an actual argument. 

The following changes should be made to the FORTRAN Reference Manual (Form No. 5001506): 

Page 8-1 The next-to-last phrase should read: 

"f. A FUNCTION or SUBROUTINE name (see Chapter 15 for exceptions)." 

Page 15-1 The first paragraph under "Dummy Argument Lists" should read: 

"Each element of a dummy argument list may be a simple variable name, an array 
name, a dummy subroutine name, or an asterisk (*). A simple variable may 
optionally be enclosed in slashes (/) . " 

Page 15-10 The next-to-last subparagraph should read: 

"* indicates that the intrinsic is an in-line intrinsic; that is, code is placed 
in the code file at the point of the intrinsic reference to perform the indicated 
funct ion. " 

D3022 FORTRAN - "DEBUG DUMP" WITH "OWN, SEPARATE" 

Add the following to the FORTRAN Reference Manual (Form No. 5001506), Page 17-3, before the 
Example : 

"Using the DEBUG DUMP statement together with options OWN and SEPARATE set in a subroutine 
is not al lowed. " 

D3023 FORTRAN - "DEBUG TRACE" WITH NO FILE SPECIFIED 

The following changes should be made to the FORTRAN Reference Manual (Form No. 5001506): 

Page 17-5 Delete the following from "DEBUG TRACE STATEMENT": 

"3. DEBUG TRACE t" 

Page 17-6 Delete the following sentences from the first paragraph: 

"If f is not specified, then the previous value of f is assumed. If f has never 
been specified, then tracing action is suppressed." 

D3093 FORTRAN - WARNING MESSAGE FOR "JLEVEL" 

The LEVEL option is no longer recognized as a valid option. The documented action for this 
option has never been implemented; this note merely serves to remove this documentation. 

A warning message will be printed when $ LEVEL is used. 

As a result, the following changes should be made to the FORTRAN Reference Manual (Form No. 
5001506) to delete any references to the LEVEL option: 

Page 19-4 Delete the ninth line: "LEVEL (p)". 
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Page 19-110 and 19-11 

Delete the description of the LEVEL option. 

Index-8 Delete "LEVEL Opt ion" . 

D3174 FORTRAN - DEIMPLEMENT "SIGNAL, RESPONSE" CLAUSES 

The SIGNAL and RESPONSE clauses of READ and WRITE statements have been de implemented on the 
Mark 32 release. A warning is produced when SIGNAL and RESPONSE are used on the Mark 31 PR1 
re 1 ease . 

D3217 FORTRAN - "BCL" WARNINGS 

A warning will now be issued for INTMODE=BCL in a file declaration or in OPEN and CHANGE 
statements . 

A warning will now be issued that the dollar options BCD, B5500 and B5700 will be de impl emented 
on the 33 release. 

D3231 FORTRAN - DEIMPLEMENT "VECTORMODE" OPTION 

The VECTORMODE option for the B7000 series has been de impl emented. An attempt to use the 
option will result in a warning message. 

D3 3 62 FORTRAN - MODIFICATIONS TO SUPPORT PORT FILES 

FORTRAN currently does not allow multiple-subfile I/O. The FORTRAN syntax and restrictions for 
port file I/O are described as follows: 

l.-Only formatted I/O is allowed when using a port file. 
-For example: 

READ (1, 100) A, B, C 

WRITE(1, 100, END=99) A, B, C 

where 1 : is declared as a file with KIND = PORT. 

100 : is the format which describes the I/O list. 
A,B,C : are the elements of the I/O list. 

2. Using unformatted I/O with a port file will result in a run-time 
error . 

For example: 

READ (1) A, B, C 

WRITE (1, END=99) A, B, C 

(See Mark 32 GENERAL note D3650, "Implementation of Port Files", for a description of port 

files.) 

In order to provide access to the port open options, the OPEN statement has been modified as 

fol lows : 

<open statement) 

— OPEN — ( — <file designator) > 

__ \ I 

>- 

.___/! \_ OPENTYPE — = --- "WAIT" 

I- "AVAILABLE" 

-/1\- RESULT — - — <ident ifier> 

-<file attribute list> 



The CLOSE statement has been modified to access a port file: 
<close statement) 

— CLOSE — ( — <file designator) 

> ) 

/1\_ RESULT — = — <identifier>--— 

I — / 1 \— <ex i s t ing-opt ions> | 
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Since there is only one meaning for close on a port file, any close options specified in the 
CLOSE statement are ignored. 

D3474 FORTRAN - FORMAL PARAMETER IN "DEBUG DUMP" LIST 

Using a formal parameter in the name list of a DEBUG DUMP statement is syntaxed as an error. 

Add the following to the FORTRAN Reference Manual (Form No. 5001506), Page 17-3, after the 
fourth paragraph: 

"Using a formal parameter in the list of simple variables and array names is illegal." 

D3542 FORTRAN - "REAL" , "AIMAG" INTRINSICS FAILED 

FORTRAN programs fail with an instruction time-out when using the complex intrinsics REAL or 
AIMAG in a loop with VECTORMODE set. 

Add the following to the FORTRAN Reference Manual (Form No. 5001506), Page 20-4: 

"e. Intrinsics, REAL, AIMAG are not allowed when the option VECTORMODE is set." 

D3 578 FORTRAN - LEGAL INPUT TO FORMAT 

Data of the form 123+4 is legal input to the D, E and F formats. For E and F, it is equivalent 
to 123E4. For D, it is equivalent to 123D4. There is an example of this in the ALGOL 
Reference Manual (Form No. 5001639) under output examples for D, E formats. 

The following manuals should be revised to include examples of this type of input: 

ALGOL Reference Manual, Pages 4-28 to 4-30. 
FORTRAN Reference Manual, Page 13-4 to 13-7. 

D3635 FORTRAN - INVALID OP WITH "> PARAMETERS" 

The FORTRAN compiler no longer faults with an INVALID OP when compiling a formal subroutine 
with 24 or more parameters which are arrays, the last one of which is subscripted; e.g., 

SUBROUTINE SUB1(SUB2) 

REAL A(l) 

CALL SUB2(A,A,A,A,A,A,A,A,A,A,A,A, 

A, A, A, A, A, A, A, A, A, A, A, A(l)) 
END 

Insert the following paragraphs into page 15-8 of the FORTRAN Reference manual (Form No. 
5001506 ) before the description about BLOCK DATA SUBPROGRAMS: 

"SUBPROGRAM RESTRICTIONS: 

Due to the complexities involved in the matching of actual parameter descriptions to formal 
parameter descriptions for formal subroutines, there is an implementation restriction which 
may prevent the use of certain combinations of parameters. This restriction becomes apparent 
only when the passing of subscripted variables must be resolved. 

If the following rules are obeyed, there is no danger of encountering the restriction: 

1. Actual parameters should be ordered such that subscripted variables do not occur beyond 
the twenty-third parameter. 



2. 



Formal parameters should be ordered such that simple variables do not occur beyond the 
twenty-third parameter." 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
FORTRAN 



P2709 FORTRAN - COMPILER LOOP ON "DATA" STATEMENT 

An array used as the index of another array in the DATA statement caused an infinite loop in 
the compi 1 er . 

Ex amp 1 e : 

DIMENSION A(10,4), 1(10) 
DATA ((A(I,K), 1=1,10), K=l,40)/40»0/ 

This problem has been corrected. 

P2710 FORTRAN - CORE TO CORE "I/O" IN "WRITE" STATEMENT 

A core-to-core WRITE statement caused an INVALID OP when trying to write a value, produced by 
the INTRINSIC function, to an array row. 

Ex amp 1 e : 

REAL A(14) 

1=1000 

WRITE (A, 1111) IABS(I) 

This problem has been corrected. 

P27U FORTRAN - ALLOW DOUBLE PRECISION EXPRESSION AS SUBSCRIPT 

A syntax error was given when a double precision expression was used as a subscript of an 
array. The problem has been corrected to allow double precision expressions as subscripts. 

P2712 FORTRAN - DETECT "GOTO" <NON EXISTING STATEMENT NUMBER> 

A GOTO <non-exist ing statement number> was not detected as a syntax error when followed by 
another syntax error in a subroutine. This problem has been corrected. 

P2734 FORTRAN - STRANGE ACTION WHEN "CHECK, SEQERR" SET 

When CHECK and SEQERR are both SET and LIST is RESET and the source input is out of sequence, 

then the message "CODE FILE NOT LOCKED DUE TO SEQUENCE ERROR" appeared at the top of the page. 

The heading and summary appeared on the next page. The card image in error was not shown on 
either the listing or the terminal. 

This problem has been corrected. The message will not appear on the file LINE, but will be 
shown in the compiler's error file at the terminal. 

P27 35 FORTRAN - FORMAT ERROR ON READ FROM DOUBLE ARRAY 
A core-to-core READ from a double precision array caused a format error #217 (RECORD OVERFLOW) 
Example: 

REAL D(2) 
REAL»8 S(2) 

READ (S, 1) D 
1 FORMAT ( 2(A5,7X)) 

This problem has been corrected. 

P2736 FORTRAN - INVALID FILE ATTRIBUTE IN "FILE" STATEMENT 

A legal file declaration statement followed by an invalid file attribute option in the file 
declaration statement caused an INVALID OP. 

Ex amp 1 e : 

FILE 1 (TITLE="XX") 

FILE 2 (KIND=DISK, UNITS=ZXX) 

This problem has been corrected by giving a syntax error when the file attribute is invalid. 
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P2836 FORTRAN - "INVALID INDEX" WITH "SYLPT" TABLE OVERFLOW 

When compiling a large subprogram with SSEPARATE set, the compiler got an INVALID INDEX because 
the binder table overflowed. This problem has been corrected. 

P28 37 FORTRAN - "AUTOBIND, SEPARATE" SET IN MAIN PROGRAM 

Using $ SET AUTOBIND, SEPARATE in the main program caused the following error message: "CODE. 
THIS FILE NOT CODE FILE". This problem has been corrected. 

P2838 FORTRAN - "AUTOBIND" AND "GO" DESPITE SYNTAX ERROR 

Autobinding was done in spite of the fact that the compile just completed had a syntax error. 
The code file which resulted was executable, but execution would fail with an incompatible 
level. This problem has been corrected. 

P2867 FORTRAN - "$" CARDS NOT IN "NEWTAPE" WITH "INCLNEW" SET 

$ cards in files being included were not entered in the NEWTAPE file, regardless of the setting 
of $ INCLNEW. This problem has been corrected. 

P2868 FORTRAN - FILESIZE ESTIMATE INCORRECT 

The estimate of the core required by the file takes no account of the fact that the file may be 
UNITS=CHARACTERS; therefore, jobs required more core than they really needed. This problem has 
been correc ted. 

P2 869 FORTRAN - PARAMETERS ARE CALL BY NAME 

A statement function now will pass parameters "by name" when OPT=0; previously, parameters were 
passed "by value". 

P2904 FORTRAN - BLANK CARD AT END OF SUBROUTINE 

An extraneous blank card at the end of a subroutine caused autobinding to a host to fail. 

Ex amp I e : 

100 $SET AUTOBIND SEPARATE 

200 $HOST IS OBJECT/HOST 

300 SUBROUTINE SUB 

400 RETURN 

500 END 

600 <" blank card "> 

This problem has been corrected. 

P2905 FORTRAN - SPURIOUS ERRORS WITH "SVOIDT, $MERGE" SET 

If the card file had SVOIDT MERGE and a continued line, as follows: 

SVOIDT MERGE 
1= 300 

*2 400 

and if the tape file had a normal statement which had the sequence number between the range of 
the continuation lines in the card file, as follows: 

1=2 350 

then the compiler would not recognize the continuation line, causing spurious syntax errors. 
This problem has been corrected. 

P2943 FORTRAN - "SSEPARATE" WITHOUT OTHER STATEMENTS 

When compiling a program containing only dollar cards and the option SEPARATE or LIBRARY, the 
compiler did not give any error. As a result, binding produced an invalid host which could not 
be used for further binding. The error message "RECOMPILE WITH MARK 2 OR LATER" appeared when 
trying to bind to the invalid host. This problem has been corrected. 

P2944 FORTRAN - PARAMETER MISMATCH 

Using arrays as parameters in FORTRAN LIBRARY procedures caused parameter mismatch with 
programs written in other languages. This problem has been corrected. 

P2945 FORTRAN - ARRAYS SEGMENTED 

Formerly, if an array were not declared as COMMON, it would be segmented even if the option 
LONG were set. Now, large arrays are no longer segmented when LONG is set. 
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P2993 FORTRAN - " INV PCW" 
An INV PCW at run-time occurred when an external subroutine was used as an actual argument and 
subsequently was called directly. 

Ex amp 1 e : 

EXTERNAL X 

CALL Y(X) 

CALL X 

END 

SUBROUTINE Y(Z) 

CALL Z 

RETURN 

END 

SUBROUTINE X 

RETURN 

END 

This problem has been corrected. 

P3007 FORTRAN - TOO MUCH STORAGE ALLOCATED 

corrected. 
P3013 FORTRAN - "INVALID INDEX" DUE TO CONFLICTING "COMMON" 

An INVALID INDEX, which occurred when a FORTRAN program had a fault due to "CONFLICTING COMMON 

ALLOCATION", has been corrected. 
P3014 FORTRAN - "W2 COMPILER ERROR" WHEN USING IOLIST 

A "W2 COMPILER ERROR", which occurred when a freefield I/O with a long IOLIST was used, has 

been corrected. 
P3156 FORTRAN - ALLOW FAMILY NAME IN "$ INCLUDE" 

The FORTR\N SINCLUDE option did not allow an "ON < f ami 1 yna«ne> " . i n the file title. This problem 

has been cor recTed; a SINCLUDE statement may now conta.n a fam.ly name. 

P3435 FORTRAN - "SINCLUDE <INTNAME>" CORRECTED 
The FORTRAN compiler no longer gets an attribute error nor hangs with a NO FILE condition when 
the following dollar card is used in a FORTRAN deck: 

SINCLUDE <intname> 
P3469 FORTRAN - COMPILER LOOP 
Compiling a DATA statement with an extra parenthesis would cause the compiler to go 



nt o an 
areninesis wuuiu ^auaw i.«*. «««.,..---- -- ^ 

compiling a L*n.m a i« i. *,«.~— .. .t---- 

infinite loop and not give a syntax error. 
Ex amp 1 e 



DIMENSION A(2,2) 

DATA (<A(I,J),I=1,2)/1, 0,0,1/ 

END 



The above example now produces a syntax error. 
P3 540 FORTRAN - EXTRA COMMA IN PARAMETER LIST 
The compiler now generates an error (instead of an INVALID INDEX) when compiling a function 
declaration with an extra comma in the parameter list. 



Ex amp 1 e : 




100 


SUBROUTINE S 


200 


G = F(A2,B2,C2,D2) 


300 


RETURN 


400 


END 


500 


FUNCTION F(A,B,C,D, 


600 


F=A+B+C+D 


700 


RETURN 


800 


END 


900 


STOP 


1000 


END 



Line 500 in the above example now generates an error. 
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P3541 FORTRAN - BLANK CAUSED SYNTAX IN "FILE" STATEMENT 

*u^cE R AJtrP r08 T con, P iled with » F ILE declaration statement in a BLOCK GLOBALS saying 
Miru:»fc=uui no longer generates a syntax error specifying unrecognized file option. 

The following example now works properly: 

BLOCK GLOBALS 

FILE 2(KIND=TAPE, MYUSE=OUT, MAXRECSIZE=80) 
END ' 

STOP 
END 

P3542 FORTRAN - USE CORE TO CORE "I/O" 

Core-to-core I/O in which the source vector is a formal array parameter with the dimension less 
than the actual dimension no longer fails with format error #217. 

The following example now works properly: 

FILE l(KIND=REMOTE) 

DIMENSION A(3),B(72) 

CALL XX(A,B) 

STOP 

END 

SUBROUTINE XX(SEND.RECV) 

DIMENSION RECV(1),SEND(1) 

N=17 

READ(SEND, 10))RECV(I) , 1=1 ,N) 

10 F0RMAT(72A1) 
END 

P3543 FORTRAN - INVALID COMMON ALLOCATION 
The compiler no longer loops after encountering an invalid common/equivalence space allocation. 
The following example now works properly: 

COMMON /A/W 

COMMON /B/X,Y,Z 

EQUIVALENCE (W, Y) , (W,Z) , (R,X) 

W=0. 

X=0. 

END 

P3 544 FORTRAN - EXPORTED UNTYPED FUNCTION 

The FORTRAN compiler no longer faults with an INVALID OP when an untyped function is exported 
from a library. r >.« 

P3545 FORTRAN - FREE FORMAT READ WITH "REAL *8" VARIABLE 

When executed from CANDE, a single comma was transmitted to the program with a free-format 
READ, resulting in the second word of a double-precision variable being set to binary zero. 

The variable is now left unchanged. 
P3546 FORTRAN - INTEGER OVERFLOW 

OPT=l° RTRAN compiler no lon « er aborts with INTEGER OVERFLOW when compiling a DO statement with 
P3573 FORTRAN - DOUBLE ARRAY AS PARAMETER 

FORTRAN no longer emits an extra "ZERO" after the code for a double-precision indexed array 
parameter when the subroutine is declared before the call. 

P3592 FORTRAN - "INVALID INDEX" 

The FORTRAN compiler no longer aborts with an INVALID INDEX when compiling an incorrect DATA 
statement. re *« *-^i •«»»« 

Ex amp 1 e : 

DIMENSION IOP(3, 10) 

DATA 10P(2,4)/6HDINAM /, IOP(2 , 5 )/6HGRAF / 

END 

This example now causes an error. 
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P3615 FORTRAN - ERRONEOUS PROGRAM AFTER WARNING 

... a ;„ ( k, declaration of a DATA statement, no data 
When a "WARNING" error message occurred in the declaration 
initializations were effective. This no longer occurs. 

P3656 FORTRAN - UNORDERED PARAMETERS IN LIBRARY 
Unordered parameters in a LIBRARY procedure did not produce errors; the program compiled 
successfully, but when executed, incorrect results were produced. 

Example of a FORTRAN program using library: 

BLOCK GLOBALS 

FILE 5(KIND=REMOTE) 

LIBRARY L(TITLE="OBJfECT/LIB") 

END 

REAL FUNCTION S(A1,N1) 

REAL Al(10) 

INTEGER Nl 

IN LIBRARY L(ACTUALNAME="SUM" ) 

END 

INTEGER M 

REAL B(10) 

READ(5,/)M,B 

T=S(M,B) 

WRITE(5,/)T 

STOP 

END 

where: OBJECT/LIB is an ALGOL 1 ibrary . OBJECT/LIB 

SUM is the ALGOL procedure name of library OBJKC1/L1B. 

Function S is called with unordered parameters, but the compiler did not detect the errors. 
This problem has been corrected. 
P3663 FORTRAN - USING VARIABLE "IF" IN "COMMON" STATEMENT 

• wi ;„ raMMON statement a syntax error occurred at every 
When IF was used as a variable in a COMMON statement, a sy 

following executable statement. 
Exampl e : 

10 COMMON F, IF 
20 F=l 
30 END 

A syntax error occurred at line 20, and the following error message was emitted: 

" "F" STATEMENT ILLEGAL IN THIS PROGRAM UNIT" 
This problem has been corrected. 
P3776 FORTRAN - "DEBUG MONITOR" STATEMENT 
Using the DEBUG MONITOR statement no longer causes the system to super halt. 
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DOCUMENT CHANGES NOTES (D NOTES) 
GENERALSUPPORT 



D3 3 76 GENERALSUPP - "SYSTEM/GENERALSUPPORT" 

The file SYSTEM/GENERALSUPPORT has been implemented to provide run-time support for codefiles 
in future releases. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
GENERALSUPPORT 

P3042 GENERALSUPP - FREEFIELD INPUT WITH COMPLEX "ALGOL" 
When an ALGOL program read a value into a complex variable wi th f reef i eld input, the imaginary 
par? was rounded !o an integer. This problem has been corrected. 

P3298 GENERALSUPP - "CTOD" TERMINATES ABNORMALLY 

Under certain conditions, the CTOD intrinsic would terminate with an ■ INVLD SQRT ARG" This 

problem has been corrected. 

P3299 GENERALSUPP - "ALGOL" POINTER "I/O" 

The construct "WRITE(F, * ,PA) " or "READ(F, •, PA) ", where PA is a pointer, 
error. These constructs are now handled correctly. 

P3309 GENERALSUPP - ARRAY ROW FREE FORMAT READ 

Sa,2~u.":s.3'J , s , ~.--:. , S!::!::.a':,':K',s.!«j:.-ws»: jrjkt xv« -Ti': 

non-indexed string descriptor. 
P3325 GENERALSUPP - CORRECr "DSQRT" ERRORS 

errors have been corrected. 
P3326 GENERALSUPP - CORRECT "GAMMA, DGAMMA" 
Both GAMMA and WiAMMA produced. results for negative integers and zero. These values now 
produce errors since the function is undefined at these values. 

P3534 GENERALSUPP - EXPONENT UNDERFLOW IN "RTOR" 
In the Mark 31 ALGOLINTRINSICS , there was no handling of exponent underflow. Now, RTOR handl 
the fault so that a fault statement will not accidentally trap the fault. 

P3657 GENERALSUPP - UPDATE "B7000" DEFINE 
The GENERALSUPPORT library will now correctly determine that the system on which the program i 
running is a B7000 series system. 



es 
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DOCUMENT CHANGES NOTES (D NOTES) 
GUARDFILE 



D3493 GUARDFILE - DATA BASE GUARDFILES 

Insert the following in the SOG Reference Manual, Volume 1, (Form No. 5001563), Page 12-1-1, 
just before the notes at the bottom of the page: 

"The guardfile specified for the entire data base is only used when the data base is invoked 
directly. When a logical data base is invoked, the guardfile specified for that logical 
data base, if any, is used." 
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DOCUMENT CHANGES NOTES (D NOTES) 
HOSTSERVICES 



D3015 HOSTSERVICES - "HOSTSERVICES" CHANGES 

cvcTPU/Hn«!T<!FRVICES and SYMBOL/HOSTSERVICES are required for Shared Resources (loosely-coupled) 
SYSTEM/HOST &fc,KVICiS» ana ainujuwnwa.c. n» u „_„ r „ Mndnlf »« their onlv inter-system communications 

» "GLOBAL Memory" is a trademark of Burroughs Corporation. 
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DOCUMENT CHANGES NOTES (D NOTES) 
INPUT-OUTPUT 



D3055 IN-OUTPUT - "CENSUS" ATTRIBUTE 

The file attribute CENSUS will return the number of queued messages when applied to a file with 
KIND=PORT. The same conditions and restrictions that apply to remote files also apply to port 
files. r 

D3076 IN-OUTPUT - "APL" FILE ATTRIBUTE 

The file attribute APL has been implemented for disk/pack files to satisfy APL access 
restrictions. It may be set prior to the creation of a new file, and is effective only if the 
codefile creating the file itself has the attribute set. The attribute may be read any time the 
file is open. An attempt to open a file with APL set will cause the accessor to be DSed unless 
■t also has APL set . 

D3222 IN-OUTPUT - CLOSE "WITH LOCK" 

The 1974 ANSI standard requires that files which are closed "WITH LOCK" cannot subsequently be 
reopened by the program. Because the enforcement of this restriction was anticipated, the 
CLOSE option "WITH SAVE" has been provided as a Burroughs COBOL74 extension intended for making 
a mass-storage file permanent while also allowing it to be reopened by the program. The "WITH 
LOCK" option continues to make a mass-storage file permanent and make tape units "NOT READY" 
and can be used as long as the logical file is not reopened. 

D3254 IN-OUTPUT - DIRECT DATACOM "I/O" FOR SWAPJOBS 

Direct I/O statements used with files of KIND=REMOTE now function the same for swappable tasks 
as for tasks not in swapspace. Specifically, the TIMELIMIT attribute now works for READ 
statements of swappable tasks. 

D3339 IN-OUTPUT - "LINENUM, PAGESIZE" ATTRIBUTES 

The documentation of the LINENUM and PAGESIZE attributes in the I/O Subsystem Reference Manual 
(Form No. 5001779) should be changed as follows: 

The second and third paragraph on page 3-35 should be replaced by the following: 

"The [LINE <aexp>] form of an ALGOL WRITE statement is provided for positioning the output 
page. The action taken depends on the values of <aexp>, PAGESIZE, and LINENUM. The [LINE 
<aexp>] form also causes the action of that write statement to change from the normal ALGOL 
mode of space after printing to one of space before printing. 

If <aexp> is greater than PAGESIZE, the page is spaced forward, if necessary, to the end of 
the logical page and the line is printed. LINENUM is set to 1 and PAGE is incremented. No 
spacing takes place after the line is printed. An end-of-page is returned to the program. 

If <aexp> is greater than or equal to LINENUM and less than or equal to PAGESIZE, the page 
»5 OT £R£" d forward . ,f necessary, to the logical line number and the line is printed. 
LINLNUM is set to <aexp> and no spacing takes place after the line is printed. 

If <aexp> is less than LINENUM, the line is printed without spacing before or after 
LINENUM is set to 1, PAGE is incremented, and an end-of-file is returned to the program. 

A skip to a channel on the carriage control tape may also affect LINENUM. A skip to channel 
!^,2 s ,, spec,a significance and causes LINENUM to be set to 1. The ALGOL form for this is 
[SKIP 1]. Skipping to any other channel does not change LINENUM, but may cause it to become 
incorrect as an indicator of the actual position on the page. The value of PAGE is not 
affected by a skip to any channel." 

The last sentence in the fifth paragraph on Page 3-35 should read as follows: 

"After an end-of-page result, LINENUM is set to 1 and PAGE is incremented." 

Insert the following paragraph after the second complete paragraph on Page 3-40: 

"Setting PAGESIZE equal to 255 has special significance. It is similar to other non-zero 
PAGESIZE settings, except that end-of-page is never returned to the program and PAGE is 
never incremented by the system. LINENUM is counted continuously and wraps around from 255 
to 0. The automatic skip to channel 1 after channel 12 is sensed is still suppressed." 

In the ALGOL Language Reference Manual (Form No. 5001639), add the following reference to the 
discussion of the ALGOL construct "WRITE (<file des i gna tor> [LINE<aexp>] " : 

"See the documentation of the LINENUM and PAGESIZE file attributes in the I/O Subsystem 
Reference Manual (Form No. 5001779) for further details." 
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D3347 IN-OUTPUT - "FULLTRANSLATION" OPTION 
On new system, beginning with the B6900 the ^TRANSLATION run time option for^the ^P^ODT 

Sefauft ZlVu.'Vt FULLT^' ^5™^^^ °" * ^ " B68 °° ^ " """"^ '° 
cause the default value for TRANSLATE to be DEFAULTTRANS . 

See the I/O Subsystem Reference Manual (Form No. 5001779), Page 4-3 through 4-5, for details on 
software translation. 
D3373 IN-OUTPUT - "DISPOSITION" FILE ATTRIBUTE 
The file attribute DISPOSITION now returns the value 11 (eleven) if the file is not open. 

D3407 IN-OUTPUT - "AREASIZE" VS. "NEWFILE" 

• -«■ >i,. abfasi7F attribute will no longer affect the 
On the Mark 35 release, the value of the AREASIZE attr te release, if the value of 

assignment (or creation) of *» » k a J'i" j, mYUSE eaua s OUT, and the NEWFILE attribute is 
KIND is equal to DISK or PACK, the a ue °£ "™| E ; ^ on i z ^ o : b „ t if AREASIZE equals zero a new 

• i. „<• wfwfitf fif overriding of the MYUSE attribute is desired) 

To aid the transition to the use of NEWFILE ( f over d^ng ° . fc „ e Mark 32 re i ease a 

and away from the side effects of the AREASIZE at tr^ouie » message, whenever a 

^manLroiTfTi^^s^^ »- OUT and AREA SI ZE „ zero. 

The warning for COBOL programs will be as follows: 

"ON 35, OPEN INPUT/OUTPUT MUST BE USED TO WRITE ON 
PERMANENT FILE. " 

The warning for other programs will be as follows: 

"ON 35, "NEWFILE=FALSE" MUST BE SPECIFIED TO 
OVERRIDE "MYUSE=OUT" . " 

D3408 IN-OUTPUT - "AREACLASS" VS. " FAMILY INDEX " 
The AREACLASS and SPEED file a 1 1 r ibu, es wi 1 1 be eliminated on the ^34 release^ They^wi.l 
not be supported on new .y»t«.. star •« the B6900 and ■«•,£„„,„„ has been support ed 
will be ignored. Since the Mark 27 "lease, tntiiieai al i ocat i n. On the 34 release, the 
as an alternat ve method for control ing d sk space a ^ oca J j , ed on Mark 3 4 using 
FAMILYINDEX attribute wi 1 be the only method all lowed . r 'ogra p ib on Mark 34 ,„ 
AREACLASS or SPEED wi 1 1 receive syntax errors The setting 01 mesc 
existing programs will be ignored by all systems. 
To aid in identifying programs which are using these attributes, warning messages of the form: 

"ON 34 THE "AREACLASS" ATTRIBUTE WILL BE DE IMPLEMENTED " 
"ON 34, "FAMILYINDEX" MUST BE SPECIFIED TO CONTROL 
SPACE ALLOCATION. " 

"ON 34 THE "SPEED' ATTRIBUTE WILL BE DE IMPLEMENTED" 

"ON 34; "FAMILYINDEX" MUST BE SPECIFIED TO CONTROL 

SPACE ALLOCATION." 
will be displayed, preceded by an attribute error message. 
D3410 IN-OUTPUT - "MTBF" ELIMINATED 
The MCP compile-time option MTBF has been eli.in.t^ The items it P-viously control 1 ed^are 
ODT mes^ge^-now^lwa^^ ar,/ dispfayed when unit 

reliability decreases. 

The requirement for operator input in response to an RF DEGRADATION message is still under the 
control of run-time option 6 (DIAGNOSTICS). 

d3482 in-output - new attributes implemented 
areaallocated 

Disk only, read only, assigned, Boolean 
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The attribute AREAALLOCATED indicates whether or not (TRUE or FALSE) a specific area of the 
associated physical file has been allocated. The AREAALLOCATED attribute requires an index 
the area number, as a parameter. If the disk file is duplicated, the copy number is also 
required as a parameter. Area numbers begin at zero (0); copy numbers begin at one (1). 

AREALENGTH 

Disk only, read/write, anytime/closed, Integer 

The value of the attribute AREALENGTH is the number of FRAMESIZE units in an area of disk file. 

If the attribute has never been set, either AREASIZE or the default for AREASIZE will be used 
It the attribute has been set, it will be used even if AREASIZE has been set. An attribute 
error will be given if AREALENGTH has been set and an attempt is made to set AREASIZE. 

The AREALENGTH attribute may be set only when the file is closed. When a new disk file is 
created, the value of AREALENGTH is adjusted so that it is also divisible by BLOCKSIZE When a 
AREALB5«¥S e *h!? in VS l Ue . " associated ? ith the physical file. The default value (used when 
Vn Ynnn I?i-h f • , V"?' ' S t Val U e whlch "Responds to the number of records closest 
„° / *J fi vl H ?b i e by th t u amb J r ° f records P" block. The maximum value is dependent 
upon the size of the disk or pack hardware. 

If AREALENGTH is read while the file is assigned, the value returned is computed from the 
physical file. In this case a valid value will be returned even if AREALENGTH was never set 

BLOCKSTRUCTURE 

General, read/write, anytime/closed, Integer 

The attribute BLOCKSTRUCTURE specifies the format of the records and the structure of the file. 

The mnemonics and meanings of the BLOCKSTRUCTURE attribute are as follows: 

FIXED Blocked or unblocked fixed-length records. This corresponds to FILETYPE 

This value is the default value for BLOCKSTRUCTURE. 

EXTERNAL Variable-length records. Neither the record itself nor the structure of the 

file contains information about the length of the record; this must be 
specified externally in the I/O statement. This corresponds to FILETYPE 3. 

VARIABLE Variable-length records. The record length is contained in the first four 

characters of the record. This corresponds to FILETYPE 1. 

LINKED FORTRAN- linked variable-length records. The link words are maintained by the 

logical I/O subsystem and are not part of the records. The mode of the 
records is assumed to be BINARY and software translation is never attempted 
This corresponds to FILETYPE 6. v • 

IL th H att i| bU -?. h u S " CV ^ r b ?l n l et ' either FILETYPE will be used or if FILETYPE was not set 
hat b 'J Ind FILETYPE wif ?* a ' tri »»<<: has been set then i t wi 1 1 be used even if fIlETYPE 
V a ™!Lh a 7T T7 will be se to a value corresponding to BLOCKSTRUCTURE when the file 
made ?o set FILETYPE 6rr ° r g,Ve " ' f BLOC KSTRUCTURE has been set and an attempt is 

If BLOCKSTRUCTURE is FIXED, MINRECSIZE is set equal to MAXRECSIZE. 

The blocking technique used with variable-length blocked files is as follows: If the length of 
BLOCKS ?7F nr J X l Wr,t ' en P lus MINRECSIZE plus the offset into the block is greatlr than 
ni^lifp' the record to be written plus the offset into the block is greater than 
BLOCKSIZE, a phj.ical write is initiated for the block. In the latter case, the rfcoro becomes 

MN&" h^ C ° r M° f thC " e Ki b !° Ck u U ^ C ' 0gical fMe is "Signed to 'a pertpnera. uni 

hir, v«? h » Tk var !?ble-length blocks (e.g., tape files), then only the part of the block 

that is valid will be written. For peripheral units that require fixed-length physical block* 

(e.g disk files) a MINRECSIZE field of nulls (4"00") will be added to thTblock as an end of 

block marker and the whole block will be written. ena OI 

The value of BLOCKSTRUCTURE has an effect upon the default value of MINRECSIZE 

r^quir 6 M NRlcSIZE Vo " l'*. "l '^ 7°^ °' '"£'* '""S^ fie ' ds «»»"•»««« w?thin the rfcofd 
Rin^^TiinS °, b g lv %L least ar «* enough to hold this information. Files with 
BLOCKSTRUCTURE equal to FIXED use a value for MINRECSIZE that is equal to MAXRECSIZE. 

DhvsU^mT 111 " 5 ,„ r fhf„ While the f \ l t is ,°P en . th « value returned is computed from the 

pnysical {>»£■ I" this case a valid value can be returned even if BLOCKSTRUCTURE was never 

set. If FILETYPE does not correspond to a legal BLOCKSTRUCTURE and FILETYPE was used to 

determine the structure of the file, then an attribute error will be given if In attemnt i< 

made to read BLOCKSTRUCTURE. given it an attempt is 

COPYNAME 

Duplicated disk only, read only, assigned, Pointer 
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The attribute COPYNAME returns the externa, file -^the spec i f . ed copy^ when^the ^ogical 
lumber* :: , : g ^.«t:rf UP I , S:it d IdU?if «<■.■) i. returned if the copy index ,. greater than 
the number of copies of the duplicated file. 

When a duplicated disk fil e whose FILENAME is A j ,. ""tg^ ^Uf. TO. o^Ir^whi J" a 
will be given COPYNAMEs of the form A/ COPY#01 A/ COPY#UZ , „ , dependent on 

permanent duplicated file's copies "e assigned ind ^ e * f u g°" ,?P^; d 6 di sk fi ,es can oe removed, 
?he order that they °"» r '5. ," C reffla copies in the duplicated file for all 
modifying the assignment of indi c i for t " e 'e ma,n }£S °° p ion , the copies' external file names 
::S , £rSi. i :i: e :h.SS e «S™T e fr.£i!? i'r-r^ib.'SlJtSJiry.-.h.. af?ec ti n 8 the assignment of 
indicies when the permanent file is opened. 



CURRENTRECORD 

General, read only, anytime, Integer 



The CURRENTRECORD attribute returns 
use. The CURRENTRECORD is equal 

DEPENDENTS PECS 



ns the size, in FRAMESIZE units, of the record 
t"o MAXRECSIZE unless BLOCKSTRUCTURE is EXTERNAL. 



currently in 



General, read/write, anytime/closed, Boolean 



If the attribute DEPENDENTSPECS is TRUE, the ormat of h eco d and he t rue t ure^of f . the 
logical file are to be <»«"'■•"* by ^JL*tructure ^ E "^AXRECS IZE? BLOCK SIZE, and FRAMESIZE 

J'T 'MlfTYPE '"uNlls 1 S ZEOFF^T STR SI^ E ' an^IzlMODE) will be changed to agree with the 
(also FILETYPB, UlMiis, aitourr^ , » „ermanent file is associated with the logical 
ft!:" ":V: SU^fl^i/b^"""^). " 1? ^T-aneVfile is unlabeled, the attribute 
DEPENDENTSPECS is ignored. 

♦ ~„a if FTTFTYPE is 7 or 8 (and BLOCKSTRUCTURE has not been 
If DEPENDENTSPECS has never been jet and f FILETYPE is 7 or 8 (* o attributes. If 

set), FILETYPE will be used ' » ° ^!' n .' i 7 o , the user set or default 
DEPENDENTSPECS has never been set and FIL 5 TYF Yf ni'PFNDFNTSPECS has been set, it will be used no 
values for these a^ributesw. be »-d If^LPENDENTSPECS^as bee ^ ^ Jjnm , § ? 

matter what value FILEIYrt was set 10. xl ~ _, f piIFTYPE when attempting to open a file. 

^TI^ie^^ror^n/be-IvenlrDEP^NDENTlpECrhal SETS? SS an att^is made to set 

FILETYPE to 7 or 8. 



FILETYPE 
given at 



that 
open 



doe s 
t ime 



not 
and 



If DEPENDENTSPECS is TRUE and the permanent file was created with s 
correspond to a BLOCKSTRUCTURE, an attribute error wil be 
BLOCKSTRUCTURE wi 1 1 subsequently act as if the user never set it. 

FILENAME 

General, read/write, anytime/anytime, Pointer 

at t r ibut e . 

The FILENAME attribute may be changed when the logical file is open on ly when i t i. f a . s i gned to 

a disk file. Under these conditions, changing the t ILUNAMti oi me 

the physical disk file to be changed also. 

FILESTATE 

General, read only, anytime, Integer 
The FILESTATE attribute indicates the logical state of the fi 1 e I f lIHD-tt MOTE - JI R P«I 
and the MAXSUBFILES at t r .but e . s grater than one a subt y e q ^ ^^ 

FILESTATE attribute. On y the va »"" CLOSED and OPENED 
values have special meanings for REMOTE or PORT tiles. 



The mnemonics and meanings of the FILESTATE attribute are as follows; 



CLOSED : 
AWAITINGHOST: 

OFFERED : 
OPENED : 
SHUTTINGDOWN: 



The initial state of a subfile is CLOSED. The subfile returns to this state 
when it is closed by the user. 

j . ♦!,„» it,, lio.it soecified by the HOSTNAME subfile 
This state md. cat es that the host spec y untj , th( . 

attribute is unreachable. ine suoiiie wi i i ""■'" nuFunpn nPFNFn nr 
host becomes reachable. The FILESTATE may then change to OFFERED, OPENED, or 

CLOSED . 

A subfile enters this state when an open has been done and the host specified 

by HOSTNAME is reachable, but no matching subfile has been found. 

This state indicates that the subfile is open and may be used for I/O 
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This notification gives the program the opportunity to terminate in an 
orderly fashion; the port remains open and all I/O operations are valid. 

This state indicates that the remote host has become temporarily unreachable 
The port remains open and all I/O operations are valid. 

CLOSEPENDING: This state indicates that the user has closed the subfile, but the remote 
subfile has not yet acknowledged the closure. When close acknowl edgment is 
; received, FILESTATE changes to CLOSED. B 

DEACTIVATIONPENDING : 

This state indicates that the remote subfile has been closed and that the 
local subfile has data queued for input. 

DEACTIVATED: This state indicates that the remote subfile has been closed and that the 
local subfile does not have data queued for input. Close is the only valid 
operation for a subfile in this state. 

DENIED: This value indicates that file assignment has been denied. 

POSTPONED: This value indicates that file assignment has been postponed. 

DENIEDILLEGALUSE: This value indicates that an illegal open was requested. 

The values of the mnemonics for FILESTATE are: 

CLOSED = 

AWAITINGHOST = 1 

OFFERED = 2 

OPENED = 3 

SHUTTINGDOWN = 4 

BI.OCKED = 5 

CLOSEPENDING = 6 

DEACTIVATIONPENDING = 7 

DEACTIVATED = 8 

DENIED = 9 

POSTPONED = 10 

DENIEDILLEGALUSE = 1 1 

FRAMES I ZE 

General, read/write, anytime/closed, Integer 

The attribute FRAMES I ZE indicates the number of bits to be transferred as a unit of data The 
rimSS^™™ 1 C attr,bute , s . M ™KECSIZE, MAXRECSIZE, BLOCKS IZE, AREALENGTH, CURRENTRECORD , and 
CURRENTBLOCK are expressed in FRAMESIZE units. 

The possible values of the FRAMESIZE attribute are the framesize of the INTMODE attribute or 48 

ISSS™? ^;- I£? S : the le 8j tinlat e values are 4 for HEX, 8 for EBCDIC or ASCII, and 48 for any 
INIMODE (6 for BCL is not allowed). 

If the INTMODE is SINGLE, the value of the FRAMESIZE attribute is 48 (one word). 

If the attribute has never been set, either UNITS or the default for UNITS will be used If 

the attribute has been set, it will be used even if UNITS has been set and UNITS will be set to 

a f V 2iUw^?^ e 2 P ° n ^ ,n8 t0 FRAMESIZE when the file is opened. An attribute error will be given 

it FRAMESIZE has been set and an attempt is made to set UNITS. 

If FRAMESIZE is read while the file is open, the value returned is computed from the physical 
tile. In this case a valid value can be returned even if FRAMESIZE was never set. 

An open error will occur if FRAMESIZE and INTMODE are incompatible. 

SCREENS IZE 

Datacom only, read only, open, Integer 

SCREENS IZE is a station attribute (that is to say, to access the attribute, a Relative Station 
Number (RSN) must be specified). The attribute returns the number of lines on a page as 
specified in the Network Information File (NIF) description of the station. For example: 

"NUMBEROFLINES : = REMOTEFILEID (RSN) . SCREENS IZE; " 

STATIONNAME 

Datacom only, read only, open, Pointer 

The attribute STATIONNAME is an external file name. The attribute requires an index the 

Relative Station Number (RSN). The STATIONNAME attribute will return the name of that station 

as it is defined in the Network Information File (NIF). If the RSN is not valid, a null 
identifier ( .") will be returned. 
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SUBFILEERROR 

Port only, read only, assigned, Integer 
The SUBFILEERROR attribute is set after each I/O operation and indicates the success or failure 
of that operation. 
The mnemonics and meanings of the SUBFILEERROR attribute are as follows: 

OK: No error occurred on the last I/O operation. 

Communication with the remote subfile has been lost due to a network failure. 

DATALOST- As a result of a close operation, some data was not actually sent to the 

DArALOM. re mote subfile before the file was closed. 

NOBUFFER The last K/O was a Write with DONTWAIT and no buffers were available to do 

the I/O. 
The values of the mnemonics for SUBFILEERROR are: 

NOERROR = 
DISCONNECTED = 1 
DATALOST = 2 
NOBUFFER = 3 

D3499 IN-OUTPUT - "OPEN" INPUT REVERSE TAPE FILES 

open and then close the file with no rewind (CLOSE in ALGOL). 
D3585 IN-OUrPUT - "CYLINDERMODE" DESCRIPTION 
The description of CYLINDERMODE on Page 3-18 of the I/O Subsystem Reference Manual (Form No. 
5001779) should read as follows: 

cylinder boundary." 
D3645 IN-OUTPUT - TAPE DENSITY 
The tape densities described on Page 3-19 of the I/O Subsystem Reference Manual (Form No. 
5001779) should have the following values: 

BPI800 

1 BPI556 

2 BPI200 

3 BPI1600 

4 BPI62 50 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
INPUT-OUTPUT 



P2771 IN-OUTPUT - "UNITNO" VS. "BACKUPTAPE" 

UNITNO can now be set for PRINTER BACKUP and PUNCH BACKUP tape files. 

P2811 IN-OUTPUT - DATACOM FILE, FAMILY ADDITION, SUBTRACTION 

Adding a datacom family to a remote file which contained a member that had been previously 
subtracted from the remote file could lead to the file's station list being corrupted This 
problem has been corrected. 

P3067 IN-OUTPUT - "KIND" FILE ATTRIBUTE 

When a PL/I program assigned the KIND file attribute a character string containing a correct 
mnemonic followed by illegal characters, if the first illegal character was less than "A" in 
the EBCDIC collating sequence, no error was generated. 

Example : 

DECLARE F FILE 

ENVIRONMENT K I ND=' DISK, XXX' ) ; 

Now, an error is properly generated. 

P3074 IN-OUTPUT - CORRECT STATE ATTRIBUTE ON REMOTE "EOF" 

The file attribute STATE was not being properly set after an EOF on a remote file. This 
problem has been corrected. 

P3149 IN-OUTPUT - "UPDATE," BINARY "I/O" WRITING TO WRONG UNIT 

5^P*5 din 6 a permanent disk file, using Binary I/O in update mode; e.g., UPDATEFILE=TRUE and 
WRITE(F,*,A) would cause the last buffer of the file to be written with an uninitialized I/O 
Control Word. In a simple example, CLOSE would get a fault; in a more complex example, the I/O 
would land on top of other records in the file. When the file was closed, the end of the file 
would not have been changed. These problems have been corrected. 

P3169 IN-OUTPUT - UPDATE, BINARY "I/O" READ WRITE TRANSITION 

Read write transitions using Binary I/O on a file being accessed with update I/O action no 
longer cause the end of file to be lost. 

P3170 IN-OUTPUT - MINIMIZE HEADER UPDATE 

ACTUALCLOSESERIALWRITE has code to check to see if the header should be written to disk- 
however, this code was effectively ignored if the unit were wr i t e-capabl e . The code now causes 
header update action only if the EOF is extended. 

Note that the header timestamp update is controlled in other procedures; those algorithms are 
not affected by this change. 

P3171 IN-OUTPUT - "BCL" BACKUP FILES 

As was promised in the Mark 30 release in note D2516, backup files are now always stored in 
EBCDIC on disk or tape. 

P3172 IN-OUTPUT - USE OF "TD830 ODT" FOR "SPO" FILES 

Direct files now have the same output handling for SPO files as logical I/O and the DCALGOL 
intrinsic WRITESPO. The output data is scanned to verify that it terminates with an ETX- at 
the same time, the sequence 48"274D" (which causes the data to be retransmitted from the ODT to 
the system), if found, is changed to blanks. If the data fills the direct array without an ETX 
character, the last character in the array is changed to an ETX. 

P3174 IN-OUTPUT - BREAK ON OUTPUT 

The notification of break-on-output on a direct I/O multistation REMOTE file will be given only 
once if the I/O which receives the notice is a broadcast write. The mistaken use of a global 
variable previously caused the error reporting to be erratic. 

P3 226 IN-OUTPUT - PROTECTED FILES CLOSED 

Small blocks on protected files are now handled correctly. A protected file closed with the 
last block smaller than one word was corrupted. The data of the last block was lost. This was 
only for protected file with UNITS=CHARACTERS . 
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P3633 IN-OUTPUT - ERROR MESSAGES CONTAIN LINE NUMBER 

i\iv zzsrsrsz :s::i:.:.i'R,TS'»ft{:: tar. !::*B^r.f.»:-!ii:ii:!i- Ere: 



changed from: 

"« NNN:NNNN:NN" 
to 

"% (NNNNNNNN)" . 



WhC r i'" \l\llTiT STACKHISTORY^d.ffe^ ™Z£ ?„e P, R^ d .na. b ;Ir;rc ! v!o»:^ Kpi^-.'lK 
oHg.nal R^anfthe' 1 inl^be^flom'sTACKHI STORY are both placed in the message in the form: 

"# NNN:NNNN:NN ft (NNNNNNNN)". 



I/O which 



P3 634 IN-OUTPUT - RANDOM BADLY BLOCKED "I/O" 

t,;:s:rw^TS\:ftr*:.: irti5.sirKS.-i:? fii*,?t:r-TKva!= i:. s.. M ~-J2. J 

P3783 IN-OUTPUT - "I/O" RESULT FROM "SEEK" STATEMENT 

Th„>„,» ...... or ,h. state ;«'ij;'; ie »;,i:.*^ k :M» .is:.,'™. .{!:'-;:'.." .:..?? o :n: 

:?i::'n:-H;:ii:£^ 

completed prior to the SEEK statement. 

U.k:i=: ;cw:.::i:-J..a .r^'sila-'J: .:ii-i..! / ?..:: , :l , .i: , :t* , s..:::is! "* k 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
INTERACT I VEXREF 



P3147 IXREF - ADD "DATABASE" AS "XREF" ITEM 

Data bases declared in BDMSALGOL programs will now be properly referenced by the XREFANALYZER 
and INTERACT I VEXREF. ' 

P33 30 IXREF - REMOVE "PORT, SIGNAL" VARIABLE TYPES 

The ALGOL variable types PORT, PORT ARRAY, SIGNAL and SIGNAL ARRAY are no longer supported. 
The EXPAND command was improperly deciding which variable types to expand. The table on which 
this command relies has been resynchroni zed with the ALGOL list of variable types. 
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DOCUMENT CHANGES NOTES (D NOTES) 
JOB FORMATTER 



D3026 JOBFORMAT - BAD RECORD DUMP 

JOBFORMATTER no longer causes a dump when it encounters a record with a bad major field. 

B3140 JOBFORMAT - NEW "EOT/EOJ" FORMAT 

Previously, when a task/job completed, a line was printed showing "EOT/EOJ", whether or not the 
task/job completed properly. Now, if the task/job is DSed, the DS reason is printed instead of 
EOT/EOJ If the task were a compile that terminated with a syntax error, "SNTX is printed 
instead of "EOT". Also, timing information (such as PROCESSOR, I/O and ELAPSED times) are now 
printed in the following format: 

hours :minutes : seconds . lOOOths of seconds 

D3575 JOBFORMAT - "PBIT" TIME ACCOUNTING 

Four new words have been added to the EOJ log record to support the changes in P-bit time 
accounting. These words are located at the end of the fixed part of the record immediately 
after the READYQTIME word. For a precise description of the layout of this type of record, 
refer to the file SYMBOL/ JOBFORMATTER on the SYSTEM tape. 

The new words are the following: 

INITPBITTIME: The processor time spent handling 

initial P-b i t s for this task. 
INITPBITCOUNT: The number of initial P-bits for this task. 
OTHERPBITTIME: The process time spend handling all other 

P-bits for this task. 
OTHERFBITCOUNT: The number of other P-bits for this task. 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 JOB FORMATTER 



PAGE 326 
B6000 SERIES MARK 32 



SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
JOB FORMATTER 



P2863 JOBFORMAT - PRINT BOXES IN ASCENDING ORDER 

If a job runs in more than one local box on a B6800 multiprocessor system, the box numbers are 
printed in ascending order (i.e., 1, 2, 3). 

P3436 JOBFORMAT - CHANGE "CONRAC" TO "ODT" 

A unit type of 2 is now printed by LOGANALYZER as "ODT" instead of "CONRAC". 
P3608 JOBFORMAT - "UNITMNEMONICS" ARRAY 

The following problems have been corrected: 

1. The value array UNITMNEMONICS had an incorrect entry (#24). 

2. The define RESETBILLINGVARIABLES was resetting SM twice and not resetting CDP at all. 

P3795 JOBFORMAT - "DP ALL" MESSAGE 

The job summary message line for the command "?DP ALL" was sometime incorrect. This no longer 
occurs . 
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DOCUMENT CHANGES NOTES (D NOTES) 
KEYED I O 



D3 393 KEYEDIO - "KEYEDIO" IMPLEMENTATION 

A new software item has been added for the Mark 32 system software release. SYMBOL/KEYED 10 and 
SYSTEM/KEYED 10 are used to support certain I/O facilities in C0B0L74. The KEYEDIO program runs 
as a library, and is invoked automatically by code emitted by the COBOL74 compiler. 

The KEYEDIO program supports multiple concurrent users, and is arranged so that record 
modifications are treated internally as a single operation, even if multiple I/O operations are 
involved. Since the KEYEDIO file consists of control information, record locator tables and 
data, this design ensures the consistency of all related file information at all times. 

D3649 KEYEDIO - "KEYEDIO" PRIVILEGED PROGRAM 

In order to ensure proper security checking of keyed files, the KEYEDIO library must be a 
transparent privileged program. 

A "PP SYSTEM/KEYEDIO:TRANSPARENT" ODT message must be entered whenever SYSTEM/KEYED 10 is 
compi led. 
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DOCUMENT CHANGES NOTES (D NOTES) 
LCOBOL 



D323 5 LCOBOL - WORKFILE COMPILED FOR "CANDE" COMPILERS 

For compilations through CANDE, the workfile will now be compiled without the necessity of 
file-equating SORSE. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
LCOBOL 



P2713 LCOBOL - "INVALID INDEX" FOR "WORKING- STORAGE" 

The LCOBOL compiler will no longer get an INVALID INDEX when the total WORKING- STORAGE exceeds 
2000 words . 

P2873 LCOBOL - "SNTX" FOR COMPILE WITH SYNTAX ERRORS 

The LCOBOL compiler now sets the TASKVALUE to -1 if a compile has syntax errors, thus causing 
SNTX to be reported in the job summary. 

P2906 LCOBOL - SAME ADDRESS FOR TWO LEVEL "77" ITEMS 

A compilation for SL3 object code would generate the same memory address for the first and 
second 77 level items. This problem has been corrected. 

P3547 LCOBOL - GENERAL "LOAD" INSTRUCTIONS AGAIN 

As a result of a previous patch, the LCOBOL compiler failed to generate LOAD instructions in 
some instances. This problem has been corrected. 
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LOADER 



D3014 LOADER - "LH" COMMAND 

SYSTEM/LOADER can now load diskpack FIRMWARE files on multiplexor and MLIP systems. The format 
of the command is the following: 



— LH — PK <nnn> MPX <m> PATH <p> 

I- VIA <port #> <lem #> <dlp #> -| 
>- <filename> FROM <tapename> 



D3157 LOADER - "LOADER" IMPROVEMENTS 
Improvements have been made which alter the operation of the LOADER. 
1. LOADER can now cool and cold start both head-pe r-t rack disks and packs. 

Syntax : 

— LOAD — <filename> DISK — > 

- FROM < t ape name > 

- DISKPACK <familyname> - 



TO — DISK 

| -<uni tno> — 
DISKPACK <unitno> 



|-<fami lyname>- 



SER <serialno> - 



a. If the "source clause" specifies DISK, the source file is taken from the family named 
DISK. 

If the "source clause" specifies <filename> FROM <tapename>, the file is taken from 
tape . 

If the "source clause" specifies DISKPACK <f ami lyname> , the file is taken from the given 
pack. 

b. The LOADER now determines the H, It/Load unit before reading the LOAD command (from the 
HALTLOADEU command or as the default disk; i.e., the lowest head-per-t rack disk or pack 
on the sys tern) . 

If the "TO clause" is specified on the LOAD command, it must specify the same disk unit. 
Previously, it was possible to change the preselected Halt/Load unit with the LOAD 
command . 

c. In the case of a cool start, the familyname and serial number of the Halt/Load unit will 
not be changed. If the optional < f ami 1 yname> and <serialno> clauses are specified, the 
LOADER will check to ensure that the proper diskpack is mounted. A mismatch will cause 
the LOADER to abort. 

In the case of a cold start, the familyname and serial number can be changed. The 
default is to leave the name and serial unchanged. If the Halt/Load volume is 
unlabelled, the default name is DISK and the default serial number is the Halt/Load unit 
number. The optional < f ami 1 yname> and <serialno> clauses can be used to override these 
defaults for diskpacks; the HLFAMILY command can be used to change the familyname for 
head-per-t rack disk. 

The HALTLOADEU command must be used to change the Halt/Load unit number. The default 
Halt/Load unit is the on-line head-pe r-t rack disk with the lowest unit number. If there are 
no on-line head-per-t rack disks, the lowest on-line diskpack is used. 



Syntax : 

— HALTLOADEU 



-<un i tno>- 
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When used, the HALTLOADEU command must precede all other cards except LH and READISC. 

3. The XD command can be used during a cool start or cold start for disk pack. Only the 
Halt/Load unit can be XDed. 

Synt ax : 

— , XD — <unitno> — ADDR — <starting segment) — FOR — <length> — ; -| 

4. All LOADER cards must be terminated by a semicolon. 

5. A card with an asterisk (*) causes the input to switch from the reader to the ODT. An "*" 
input from the ODT causes the input to switch back to the card reader. If, at BOJ time, the 
LOADER cannot find an on-line card reader, it will accept input from the ODT. In order to 
switch to a card reader, the operator should first READY the reader and then enter an "*" 
from the ODT. Previously, the LOADER required that the first command be read from a card 
reader; it would not accept input from the ODT until an "*" was read from the card reader. 

The following restrictions apply: 

1. HPT - only the family name DISK is allowed. 
D3462 LOADER - "HALTLOADEU" MESSAGES 

"H/LUNIT" has been changed to "HALTLOADEU" in various messages emitted by the LOADER. 
D3 5 67 LOADER - "OLAYROW" SIZE 

The default overlay row size is 400 (not 800) segments. 

The SOG Reference Manual, Volume 2 (Form No. 5001688), Page 5-1-34, the sentence "The default 
value is 800 segments" should be changed to read as follows: 

"If OLAYROW is not set, the LOADER will use the rowsize already in effect for that disk (by 
previous COLDSTART) . If there was no rowsize in effect, 400 will be used." 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
LOADER 



P2778 LOADER - "IV" 

The IV command now works as documented; previously, it was expecting a token (";") at the end 
of the statement . 

P2962 LOADER - CONVERT "LOADER" TO "NEWP" 

LOADER has been converted to the NEWP language. 

P2986 LOADER - "206,207" DISK PACK COLDSTART 

LOADER can now coldstart 206 and 207 disk packs that have "bad label's. Normally a pack with a 
"bad label" would have to be IVed, but 206 and 207 disk packs can only be IVed via the SCR IVR 
command (on B6700/B6800 systems) or via PTD (B6900 systems). 

P3053 LOADER - "INVALID ADDRESS" INTERRUPT 

An INVALID ADDRESS interrupt, which occurred when running on a B6700 with more than one 
multiplexor, has been corrected. 

P3437 LOADER - "INVALID INDEX" ON "MOD 63" 

The LOADER no longer fails to initialize a system which has a MOD 63 on line. 

P3694 LOADER - SEQUENCE 

The LOADER will now check the record sequence number of blocks it reads from tape. A mismatch 
will cause an appropriate error message, and the load will terminate. 
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DOCUMENT CHANGES NOTES (D NOTES) 

LOG ANALYZER 

D3384 LOGANALY - ADD STARTING, ENDING TIMES TO HEADING 

The date and time of the first log entry and the last log entry have been added to the headings 
of the D3GANALYZER reports. 

Also, the I/O time required to read the log has been reduced approximately 50% by changing the 
input blocksize from 300 words to 1500 words. 

D3627 LOGANALY - "THAW" COMMAND 

THAW (described in GENERAL note D3356) is now a valid type for the OPERATOR option. 



B6000 SERIES MARK 3 2 RELEASE 05 NOVEMBER 1980 LOG ANALYZER 



PAGE 334 
B6000 SERIES MARK 32 



SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
LOO ANALYZER 



P3 27 8 LOGANALY - MAINTENANCE LOG ENTRIES 

Ever since LOGANALYZER was modified to handle IOCONDITION type entries, maintenance log entries 
have not been sorted properly in the reports. Now the maintenance log entries will again be 
sorted properly by unit number, date and time. 

P3362 LOGANALY - "DL" MESSAGE "INVALID INDEX?" 

LOGANALYZER will no longer take program dumps processing valid DL messages. 
P3 582 LOGANALY - LOG NOT FOUND 

LOGANALYZER no longer ignores DL information if no parameters are given. 

P3660 LOGANALY - UNRECOVERED ERRORS SHOWN 

When the final result descriptor for a tape unit error entry had the BOT/EOT bit on, the retry 
would be counted as unrecovered, even though the I/O had been successful. 

Bit 8 (BOT/EOT) of the tape result descriptor is now masked out along with bit 10 (short block) 
when testing for unrecovered errors. This also ensures that "101" result descriptors will not 
be counted as errors during retries. 
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DOCUMENT CHANGES NOTES (D NOTES) 
LOGGER 



D3416 LOGGER - "LOGGER" VS "DL LOG" 

Logger will now correctly find the SYSTEM/ SUMLOG file if it has been relocated by use of the 
"DL" ODT command. 

D3457 LOGGER - LINE EQUATED TO BACKUP TAPE WITH CATALOGING 

For sites with CATALOGING set TRUE and a requirement to equate the LINE file of SYSTEM/LOGGER 
to BACKUP TAPE, the following syntax should be used: 

Pre-29 WFL 

FILE LINE (KIND=PR INTER BACKUP TAPE, LABELTYPE= STANDARD) 
NEW WFL 

FILE LINE (KIND=PRINTER,BACKUPKIND=TAPE,LABELTYPE=STANDARD) 

The LABELTYPE= STANDARD will allow a volumed printer backup tape 
to be created. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
LOGGER 



P3166 LOGGER - "ORGMCS, DESTMCS" INTEGER TYPE 

The ORGMCS and DESTMCS jobsummary file items in LOGGER have been changed from type string to 
type integer. This will allow INCLUDES and EXCLUDES to work properly. This change will not 
affect internal storage of the information in the jobsummary file, but any report that uses 
either ORGMCS or DESTMCS in an INCLUDE or EXCLUDE statement must be changed. 

P3 3 57 LOGGER - COMMAS BETWEEN "SORT" ITEMS 

LOGGER allows commas between SORT items. 

Syntax : 

— SORT <item>- 



BY 



ASCENDING — 
DESCENDING - 



P3 363 LOGGER - YEAR TO DATE SORT ERRORS 

LOGGER will now apply the user request sort parameters to the YEAR TO DATE report generation, 
thus allowing the user to control the amounts of memory and disk the sorts will use and to 
correct for sort errors when not enough space is available. 

P3 364 LOGGER - NO FILE JOBSUMMARY 

LOGGER will no longer hang on a no file JOBSUMMARY/XXXX or STATISTICS/XXXX when an empty 
SYSTEM/SUMLOG file is used as input. LOGGER will take EOF action on the missing files. 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 LOGGER 



PAGE 337 
B6000 SERIES MARK 32 

DOCUMENT CHANGES NOTES (D NOTES) 

MCP-GENERAL 

D3054 MCP-GENERAL - "SWAPPER" ENHANCEMENTS 

The SWAPPER mechanism has been improved on the Mark 32 release. Many features have been 
expanded or enhanced; some features have been redesigned. 

CHANGES TO THE SWAPPER PARAMETER MECHANISM 



Previously, the SWAPPER parameters were stored in the first record of the SYSTEM/SWAPDISK file 
currently in use by SWAPPER (the packname was stored in MCPINFO) . On the Mark 32 release, the 
parameters are stored in the directory of the Halt/Load unit. The parameters are read during 
MCP initialization and are always available (whether or not SWAPPER is running). During a CM 
operation, the parameters are copied to the new Halt/Load unit. In order to preserve 
compatibility with previous releases, a copy of the parameters is stored in each swapdisk file 
in Mark 3 1 format . 

The SW ODT message is used to change or interrogate the SWAPPER parameters. On previous 
releases, the response to an SW message was given by displays from each SWAPPER independent 
runner. On the Mark 32 release, the CONTROLLER usually issues the response to the SW message; 
thus, the values of the parameters are available through the DCKEYIN intrinsic. 

CHANGES TO THE SW ODT MESSAGE 
Old Forms De impl ement ed 



The "SW" or "SW ON <packname>" message is now used only to interrogate the SWAPPER parameters. 
Only the "SW+" message is used to initiate SWAPPER. The "ON" and CORESIZE options of the "SW+" 
message have been replaced by the "FAMILY +" and "CORESIZE" options of the SW message. 

See Mark 32 GENERAL note D3356 for a description of the syntax and semantics for the SW ODT 
mes sage . 

NEW SWAPPABLE ENTITIES 



Librar ies 



General Rules 

Libraries are now permitted in swapspace. If a library executes in swapspace, any program 
using the library as well as any task processed out of the library must also run in swapspace. 
On a B6800 Multiprocessor system, all tasks associated with the library (users and processes 
of) must also run in the same subsystem. Swapping a user of a library is functionally the same 
as swapping an offspring of the library; i.e., whenever the user is in memory, the library must 
also be in memory. However, the reverse is not true; when the library is in memory, any of the 
users of the library may or may not be in memory. 

Speci f icat ion 

As with all tasks, the swappability of libraries is controlled by the SUBSPACES task attribute. 
The values of the SUBSPACES attribute for libraries are the same as for regular tasks. The 
SUBSPACES attribute can be set by two methods: compile-time specification and run-time 
inheritance. The SUBSPACES attribute can be specified at compile time through WFL. If no 
value of the SUBSPACES attribute is specified by compile-time equation, a library with a 
sharing class of PRIVATE inherits the value of the SUBSPACES attribute from the tasks which 
caused the library task to be initiated. 

Data Bases 

General Rules 

On the Mark 32 release, the DMS ACCESSROUTINES (Data Base Stack) are initiated as an ordinary 
task with certain privileges. This task may now run in swapspace. As with libraries, if the 
DBS runs in swapspace, so must all its users. 

Spec i f icat ion 

The SUBSPACES task attribute is used the control the execution of DBSs in swapspace, just as it 
does for ordinary tasks. The attribute can only be specified at compile time in the 
ACCESSROUTINES codefile. The SUBSPACES attribute for a data base is never inherited. 
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General Rules 



Job stacks may now be run in swapspace. All of the rules for regular process families run in 
swapspace also apply to the WFL job and its offspring when run in swapspace. Note that any 
external process of a WFL job is a semitf -pendent task; i.e., the job itself need not be swapped 
in in order to execute the offspring t ~ks. (See MCP-GENERAL note D3252 for a description of 
semi dependent tasks.) 

Spec i f i cat ion 

Again, the SUBSPACES attribute is used; note that only the values or 3 are meaningful for a 
job stack. The attribute can be specified on the queue through which the job runs or on the 
job header. If either of these methods are used, the attribute is inherited by all tasks run 
out of the job. Operational overhead can be reduced by specifying a new option, SWAPALLJOBS 
(Option 32), which causes all job stacks to run in swapspace without forcing inheritance of the 
SUBSPACES attribute on the tasks run out of a job stack; thus, an installation could choose to 
run all job stacks in swapspace but not other stacks. 

S t ackswap 



Programs which use the DCALGOL stackswap construct (such as CANDE) may now run in swapspace. 

ELIMINATION OF SYSTEM/ SWAPD I SKMAKER 



Since the SWAPPER parameters are no longer stored on swapdisk, it is no longer necessary to 
specify the SWAPPER parameters when a SYSTEM/ SWAPDISK is created; instead, only the rowsize and 
the number of rows to be allocated are specified. The CREATE option of the SW ODT message 
(described in Mark 32 GENERAL note D3356) is used to create new SYSTEM/SWAPDISK files. The 
text of the input message is compiled by WFL (using TASK.FILECARDS format) to produce the 
attribute equation for the creation of the swapdisk file; thus, any combination of permissable 
file attributes can be easily specified. 

SWAPPING ON MULTIPLE FAMILIES 



SWAPPER now has the ability to use more than one family and more than one SYSTEM/SWAPDISK file 
on which to swap. The SW ODT message is used to create a swapdisk file on the desired family. 
The FAMILY option on the SW message is used to dynamically add to or subtract from the list of 
packs SWAPPER uses, as follows: 

SW FAMILY + KSID 

This message causes SWAPPER to find the file SYSTEM/SWAPDISK on KSID. This file is opened 
and made available to SWAPPER. 

SW FAMILY - KSID 

This message causes SWAPPER to cease using the family KSID. Also, all of the tasks which 
are currently swapped out on the family KSID are swapped in (from KSID) and then swapped 
out again (to a family other than KSID). When there are no more tasks resident on KSID, 
the file SYSTEM/SWAPDISK on KSID is closed and the operator is notified. 

Multiple Families on a B6800 Multiprocessor System 

On a B6800 Multiprocessor system, each processor running SWAPPER maintains its own list of 
families available to SWAPPER; thus, it is now possible to swap on a family that is not 
exchanged to every processor running SWAPPER. To support process family migration, at least 
one family of swapdisk must be usable by all of the processors in which the migratory task will 
run . 

Multiple Swapdisk Families with Different Row Sizes 

There is no requirement that the row sizes for each swapdisk family be the same; however, 
SWAPPER requires that each I/O operation fit entirely within a single row of a swapdisk. The 
maximum value of the MAX I OS I ZE parameter is the size of the largest row of swapdisk available. 
This can allow an installation to segregate some classes of SWAPPER I/Os by setting the rowsize 
of some swapdisk families smaller, thus preventing subspaces with large I/Os (larger than the 
rowsize) from being swapped on that family. This capability can cause an "out of swapdisk" 
condition to occur whenever there is insufficient space on swapdisk(s) with large enough 
rowsizes, even though there may be space available on other swapdisk families. This situation 
can be relieved by either adding another family on which to swap (with a large enough rowsize) 
or decreasing the MAXIOSIZE parameter. 
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OUT OF SWAPDISK MECHANISM 



When SWAPPER runs out of swapdisk, an independent runner is forked which then waits on an RSVP 
notifying the operator that more swapdisk is needed. The operator can either wait for the 
situation to repair itself (i.e., wait for a job in memory to complete) or add a new family 
available to SWAPPER via the SW ODT message. When running on a B6800 Multiprocessor system, it 
is possible to be out of certain kinds of swapdisk. Because a migratory task requires swapdisk 
that is used by each of the processors in which it can run, it is possible for this task to be 
out of swapdisk even though there may be space on another family (but this family is not being 
used by all of the processors). When this situation arises, the "out of swapdisk independent 
runner displays the list of processor visiblity swapdisks which are needed. 



Example : 



1 WAITING ENTRY 

3496/3496 OUTOFSWAPDISK 

3496 ** OUT OF SWAPDISK FOR PROC(S) (1),(2,3) ** 



The above example notifies the operator that some swapdisk is required that is usable by 
processor 1 and some swapdisk is required that is usable by processors 2 and 3. 

NEW FORMAT FOR SWAPSPACE 

MINCHUNKSIZE Attribute 

On Mark 31 and earlier releases, the swapspace was required to be a single contiguous piece of 
memory. On Mark 32, the swapspace is now permitted to be any number of pieces of memory. 
These "chunks" may be located anywhere in memory. This feature allows dynamic growth of the 
swapspace, and it prevents "holes" in memory from severely affecting site operations. Even 
though the swapspace can be divided into several different pieces, each individual subspace 
must still reside in a contiguous area of memory. A segmented swapspace may not be able to 
handle the same number of tasks as a non-segmented swapspace with the same number of slots. 

Ex amp 1 e : 

A swapspace with one chunk of 90 slots could run 3 tasks of 30 slots each simultaneously; a 
swapspace with a 50-slot and a 40-slot chunk can run at most two 30-slot tasks 
simul taneous ly . 

To control this situation, a new parameter, MINCHUNKSIZE, has been implemented, whi ch s|>i c 'f' ies 
the smallest amount of memory that a single chunk of swapspace may contain (MAXCORE <= 

MINCHUNKSIZE). By setting the MINCHUNKSIZE attribute to the value of the CORESIZE attribute, 
behavior similar to that implemented in Mark 31 and earlier releases may be obtained. 

Changing the Swapspace Size via the CORESIZE Parameter 

The semantics of the CORESIZE attribute remain unchanged from previous releases; however, the 
semantic effects of dynamically changing this attribute have been changed on the Mark 32 
release. The basic philosophy is that SWAPPER will accept the new value of the parameter and 
attempt to bring the swapspace into conformance. The new value is preserved so that the next 
time SWAPPER is initialized it can get the exact amount of swapspace desired. At any time the 
amount of swapspace actually in use can be determined from the value displayed next to 
ACTUALCORESIZE in response to the SW keyin. 

Expanding the Swapspace 

By setting the value of the CORESIZE parameter greater than the current value of 
ACTUALCORESIZE, SWAPPER attempts to expand the amount of swapspace available by getting one or 
more "chunk's of memory and inserting these into SWAPPER'S tables. These new chunks of memory 
are constrained by the value of the MINCHUNKSIZE parameter. If the di f f ^ence between the new 
value of CORESIZE and the current value of ACTUALCORESIZE is less than MINCHUNKSIZE, no 
increase in swapspace can be performed. 

Shrinking the Swapspace 
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SWAPPER Initialization and Swapspace Size 

At initialization time, if SWAPPER is unable to obtain the amount of swapspace specified by the 
CORESIZE parameter, an RSVP is issued notifying the operator of the situation. The operator 
has four alternatives: 

1. Reply DS to the RSVP, aborting SWAPPER i n i t i a 1 i za ton . 

2. Reply OK, causing SWAPPER to again attempt to find the required memory (this is done 
per iodi cal ly ) . 

3. Reply NOTOK, causing SWAPPER to continue initialization using whatever memory it has already 
obtained. 

4. Enter a new value for the CORESIZE parameter using the SW ODT message. SWAPPER attempts to 
obtain the new amount of memory. 

CONTROLLER DISPALY OF SWAPPER PARAMETERS 



A sample of the new format for displaying SWAPPER parameters is the following: 

SW ** RUNNING ** CORESIZE=90 SLOTS (89100 WORDS) 

SW ACTUALCORESIZE=90 SLOTS (89100 WORDS) MINTIME=3 SECONDS 

SW MAXSLICENR=7 RATIO=2 MAXCORE=50 SLOTS (49500 WORDS) 

SW MAXIOSIZE=50 SLOTS (49500 WORDS) 

SW MINCHUNKSIZE=50 SLOTS (49500 WORDS) EXPRESERVE=0 SLOTS (0 WORDS) 

SW EXPMAXCORE=0 SLOTS (0 WORDS) EXPMAXTIME=0 . 75 SECONDS 

SW PRIORITYBIAS=0 UTILIZATIONBIAS=6 IOBIAS=0 MEMORYBIAS=0 

SW NOSWAPTRANSTATE ON SWAPPACK ON KSID 

The initial item "** RUNNING **" is an indicator of the current status of SWAPPER; the values 
range from NOT RUNNING to INITIALIZING or SHUTTING DOWN. 

"ACTUALCORESIZE" is an indicator of the amount of swapcore actually being used by SWAPPER (see 
"Changing the Swapspace Size via the CORESIZE Parameter" for semantics). 

"NOSWAPTRANSTATE" indicates that the NOSWAPTRANSTATE option is set (see "SWAPTRANSTATE, 
NOSWAPTRANSTATE PARAMETERS " for s eman t i c s ) . 

"ON SWAPPACK ON KSID" indicates that SWAPPER is using the SYSTEM/SWAPDISK files on the packs 
SWAPPACK and KSID on which to swap. 

I/O ERROR HANDLING MECHANISM 



SWAPPER has two distinct algorithms for dealing with I/O errors. 

I/O Errors on Write Operations 

After receiving an I/O error on a write operation, SWAPPER marks the area of swapdisk in 
question as bad and attempts to retry the write operation to a different area of swapdisk 
(possibly on a different family). The table of areas of bad swapdisk is stored in the 
SYSTEM/SWAPDISK file itself, and is referenced any time SWAPPER opens this file. To clear the 
table, remove and then re-create the swapdisk file. 

I/O Errors on Read Operations 

If an I/O error occurs on a read operation, the affected task is stuck on disk; it cannot be 
DSed. When this situation occurs, SWAPPER writes a message into the job log for the affected 
task and notifies the operator via an RSVP. If the operator wishes to retry the I/O operation 
(e.g., if a pack had gone not ready and was now on a different spindle), an appropriate reply 
to the RSVP would cause a retry. If the situation is not corrected (i.e., there is another I/O 
error), the above process is repeated. 

D32 51 MCP-GENERAL - "GETSTATUS/SETSTATUS" ENHANCEMENTS 

The DCALGOL Intrinsic GETSTATUS has been enhanced for the Mark 32 system software release. 

1. I/O Path Information 



GETSTATUS now returns I/O path information for Multiplexor or MLIP I/O subsystems. General 
information and path-specific information are provided. 

Parameters 

GETSTATUS is invoked to obtain unit information in the usual manner: 
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GETSTATUS(TYPE, SUBCLASS .MASK, A), where TW|;™YPBF = o', 1 

SUBCLASS = 1 , 

MASK = <info mask> 

A = <array> 



or 2, 



t » t ii a „A ,,rli C r MCP releases bit 31 of Che mask would cause multiplexor/channel 

In Mark 31 and earlier MCr re leases , a i * „ _. . . . • st jil operative, but for 

information to be packed into a single elemen o A Th s bit ope ^^ ^ 

B6800 and earlier systems only. Path information win not f 

setting of bit 31. 

For the Mark 32 release bit 41 is rec ^nized as the path informat io. bit § .^ "J^'-; 

var^bt lengSiTporl i o^o f ' ^A* array |° I V ^[BASE^i + l ] is now the index into A of the 

actual information. 

Path Information Format 

The first word, starting at A[A[BASE+41+1 ] ] , consists of general information. 



FIELD 

[47:4] 
[43:8] 



NAME 

SYSTEMTYPEF 

PCTYPEF 



[35:8] UNITTYPEF 

[27:12] BASEUNITF 
[15:4] RELUNITF 



B6700, B6800 

1 

physical type of 
the unit. 

same as PCTYPEF. 

N/A (always 0) 
N/A (always 0) . 



B6900 

2 

DLP identity. 



type of unit 
outboard the DLP. 

DLP base number. 

relative number of 
the uni t wi th 
respect to the DLP. 



[11:8] 
[ 3:1] 



NUMPATHSF 
OUTBOARDHOSTF 



total existing paths 
to the uni t . 



N/A (always 0) 



when set, this bit 
serves as 
not i f i cat ion that 
one or more paths 
to the unit is via 
an outboard host 
(e.g. , an LSP DLP 
outboard an NSP 
DLP) . See 
HOSTDLPF, below. 



[ 2:1] 
[ 1:2] 



FIRMWAREFLAGF 



* NOT USED * 



1 if firmware level 
info is available, 
i f not . 

always 0. 



The second and subsequent words contain information specific to 
words per path. 

The first word of each path entry contains firmware level 
A[A[BASE+41+1]]. FIRMWAREFLAGF is 0, then this word is 0. 



each existing path, 
information. Note: 



two 



if 



FIELD NAME 

^47: 12] * NOT USED » 
[35:4] FWSIZEF 

[31:32] FIRMWAREF 



B6700, B6800 

always 0. 



B6900 



number of relevant 

hex digits in FIRMWAREF. 



Control ler (e . g 

DPDC) level, 

right 

jus t i f i ed . 



Controller (e.g. 
DPDC) or DLP 
f i rmware level , 
r ight jus t i f ied. 



The second word of each path entry contains path status information. 
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[47:1] PATHRESERVEDF 

[46:1] PATHOFFLINEF 

[45:1] PATHASS IGNEDF 

[44:6] PATHIDF 



[38:3] 
[35: 12] 
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* NOT USED * 
HOSTDLPF 



N/A 



1 if path has been 
"UR"ed, if not . 

1 if path has been 
taken offline by the 
MCP, if not . 

1 i f path has been 
assigned to a stack, 
if not . 

an unique path identi 
fi cat ion value . 



always 0. 
(always 0. ) 



i f OUTBOARDHOSTF i s 
1 , then a non-zero 
entry in this field 
■ s the phys ical 
unit number of the 
outboard host DLP 
in control of the 
uni t ; a zero entry 
indicates that this 
particular path is 
directly connected 
to the host. 



[23:4] PROCNUMF 



[19:4] IOPORTNUMF 



[15:8] * NOT USED * 
[ 7:4] IOPORTPORTF 
[3:4] DLPNUMF 

2. Unit Subtype Value 



Processor number. 



Multiplexor number. 



always 0. 
Channel number. 
N/A (always 0.) 



Processor number; 
If OUTBOARDHOSTF is 
1 and HOSTDLPF is 
non-zero, then this 
field is zero 
(meani ngl ess ) . 

MLIP port number . 
I f OUTBOARDHOSTF i s 
1 and HOSTDLPF is 
non-zero, then this 
field is zero 
(meaningless ) . 



LEM port number. 

base-relative DLP 
number . 



The DCALGOL Intrinsic GETSTATUS has been enhanced to return the unit subtype value if the 
value exi st s . 

Parame t ers 

GETSTATUS is invoked to obtain unit information in the usual manner: 

GETSTATUS (TYPE, SUBCLASS, MASK, A), where TYPE.TYPEF = 1 

TYPE.SUBTYPEF = 0, 1, or 2, 

SUBCLASS = 1 , 

MASK = <info mask> 

A = <array> 

To obtain the unit subtype value, bit 42 is of the MASK is turned on. 

Unit Subtype Values 

If the unit does not have a valid subtype, then bit 42 of the validity mask is reset If a 
subtype exists, then A[BASE+42+l] will contain the subtype value. The current subtype 
values are : 3V 
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MAGNETIC TAPE SUBTYPES 



7 TRACK 

9 TRACK NRZ 

9 TRACK PE 

9 TRACK GCR 



DATACOM SUBTYPES (B6900 and later systems only) 



8: NSP DLP 
10: LSP (sub broadband) 



3. ODT Message Cases 
BOOTUNIT ODT Message 

The BOOTUNIT message case in GETSTATUS/SETSTATUS handles the new BOOTUNIT ODT syntax. 
GETSTATUS 
Parameters 

1. TYPE = MISCREQUEST 

2. SUBTYPE = 50 

3 . ARRAYROW 



A[0] 



= number of entries + 1 



A[1]-A[A[0]-1] 

= each entry as follows: 
Ar All. [19:8] = PROCMASK (see SETSTATUS) „,,,.,, c B T«T»TirQ^ 

A[AI] '[11:12] = unit number of disk type device for Halt/Load (see SETSTATUS) 

SETSTATUS 

BOOTUNIT Modify processor bootstraps 

Parame t ers 

1. TYPE = MISCREQUEST 

2. SUBTYPE =46 

3 . VALUE 

= if monolithic system 

1 = multiprocessor B6900 system 

4 . ARRAYROW 

A[0] = number of entries + 1 

A[1]-A[A[0]-1] 

= each entry as follows: j-r: a 

A[AI].[19:8] = PROCMASK of processors whose bootstraps should be moaitieo 
[19:1] = Processor 7 
[18:1] = Processor 6 



[12:1] 
A[AI] . [11:12] 



= Processor . . . ■ , 

= unit number of disk type device from which the above processor 

should Hal t/Load 



ID ODT Message 

The ID message case in SETSTATUS has been revised to handle new ID ODT syntax. 

SETSTATUS 

ID (Initialize datacom, set NSP prefix, set NSP firmware suffix, set NSP audit options 
request NSP local memory dump, and terminate datacom) 

Parame t ers 

1 . TYPE = 2 

2. SUBTYPE =45 

3 . VALUE 



[0 
[1 

[2 
[3 
[4 
[5 

[6 
[23 



= 1 DCP number or NSP unit number is supplied 
= 1 NIF prefix is supplied 
= 1 Request NSP memory dump 
= 1 Terminate NSP 

= 1 NSP firmware suffix is supplied 
= 1 NSP audit options to set is supplied 
= 1 NSP audit options to reset is supplied 
Audit options to set 
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[31:8] Audit options to reset 
[47:16] NSP firmware suffix value 

4 . ARRAYROW 

A[0] = length of entry + 1 
A[l] 

[23:8] = DCP/NSP number 

[38:6] = Length of standard form NIF prefix (in words) 
A[2-(A[0]-1)] 

= Standardform NIF prefix 

Example : 

ID 2 TESTNDL ON PACK 



A[0]:=5 

A[1]:=0 & 2[23:8] & 3[38:6]; 
REPLACE A[2] BY 48 " 10060207 " 8 "TESTNDL" , 
48"04"8"PACK" ; 

RSLT : =SETSTATUS ( 2 , 4 3 , 3 , A ) 

The following message will be issued warning that the Subtype 18 of the Miscellaneous 
Request category of SETSTATUS will be de impl emen t ed on the Mark 34 system software release: 

"START DATACOM CASE 18 WILL BE DE- IMPLEMENTED ON 34 
(USE CASE 45)" 

OL <unit mnemonio ODT Message 

With the new GETSTATUS I/O path information interface, the path display that results from 
the "OL" ODT command has been modified in SYSTEM/CONTROLLER. The information displayed 
depends on the system type. 

B6800, B6700 SYSTEM/CONTROLLER Path Display Modification 

A new "PATHID" column precedes the "MPX" column. 
B6900 SYSTEM/CONTROLLER Path Display Implementation 

Given the differences in the new hardware, the path information displayed by 
SYSTEM/CONTROLLER on a MLIP system is different from that displayed on the B6800 or B6700. 

If the path to the unit is via an outboard host (e.g.,. NSP DLP) , a "HOSTDLP" column will 
follow the "PATHID" column; the entries in this column will be the physical unit number(s) 
of the controlling DLP(s). 

If there is no firmware level information, the "FIRMWARE" column is omitted from the 
di splay . 

A new SETSTATUS case has been added for the LH ODT message. 

Parameters 

1 . TYPE = 1 

2. SUBTYPE = 21 

3 . VALUE - s ame as Ca s e 16 

4. ARRAYROW - same as Case 16 except: 
A[l] 

[47:1] same as Case 16 

[46:1] = 1 PATHID specified in [44:6] 

[45 : 1 ] not used 

[44:6] = PATHID 

[38:39] same as Case 16 

A new case has been added for the UR ODT message. 
Parame t ers 

1 . TYPE = 1 

2. SUBTYPE = 20 

3. VALUE - same as Case 4 

4. ARRAYROW - same as Case 4 except: 
A[l] 

[47 : 1 ] same as Case 4 

[46:1] = 1 PATHID specified in [44:6] 

[45 : 1 ] not used 

[44:6] = PATHID 

[38:39] same as Case 4 
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D3252 MCP-GENERAL - SEMIDEPENDENT TASKS, "VISIBILITY" ATTRIBUTE 

INTRODUCTION 

♦ „ r „f t»«k has been defined, called "semidependent." The properties of 
temi^pen^nftLkf permit tnem to'be" handled by the MCP with more flexibility than ,s poss.ble 
with fully dependent tasks. 

,„ „ rH „ r to take fun advantage of semidependent tasks on B6800 mul t iprocessor ( t ight ly-coupl ed 
In °™! r to ! i! h!. h!,» „.«, «rv to modify the rules for allocating tasks to subsystems. 
To Jovid: y fu?7 S con r S'o? Su"li:S;?I« "2: Semantics of the SUBSYSTEM attribute have been 
modified? and a new attribute, VISIBILITY, has been created. 

DEFINITIONS 



Dependency 

initiated by the RUN statement tn ALGOL or COBOL. 

or PROCESS statement in ALGOL or COBOL. 



sem TAsr n var!abn k '. : .: .^"X"?.^- M5' °5-S::.-° tS°°s:t .'t.*tj: &.;? 5:i; B }i/.:..... rr s 

ramlters so a ask may be semidependent if it is external (separate code hie, hence no 
\l*7d global")? and if it is passed no parameters by reference or by name. 



A s< 
the 
pai 
shared gl 

A task which has data visibility into its parent is not semidependent; such tasks are called 

ful ly dependent . 



Subsystem 

The word "subsystem" (lower-case) refers to part of a TC system: either . local processor, with 

its memory, or the * GLOBAL tm Memory. 

* "GLOBAL Memory" is a trademark of Burroughs Corporation. 




SUBSYSTEM 

s 
b 

P 

at t r lbut e . ) 



SUBSYSTEM will also be introduced below as one of the mnemonic values t 
aVtribuie; it makes the effect of VISIBILITY cond.t.onal upon th 



alues for the new VISIBILITY 
e value of the SUBSYSTEM 



at t r ibut e . 



MOTIVATION 



The visibilitv rules for TC systems have required that any dependent task be able to see its 

"afks anywh"ffn the system. See CANDE note D3249 for further discussion of th.. subject. 
There have been two inadequacies of the SUBSYSTEM specification mechanism in the Mark 31 MCP; 
both have been addressed in the design changes. 

1 • is;a:\!K*.::.; , s-s.s.i-=£:»rc '^■a»:t , iw.iOT^:H , K!-i~»s: 

while the local component ( s) were ignored for jobs, databases and MCSs. 

" way\o C s Pec !?y 7.S T'iWXcW.ilVViV °ll ' ta^ks? was !o'?„.°,. two (or more) but not all 
of the processors on the system. 
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EXTERNAL CONTROLS 



The external control of task location has been modified by adding a new task attribute 
VISIBILITY, and modifying the SUBSYSTEM attribute. There has also been some relaxation in the 
rules for the SUBSPACES attribute. The changes have been made in such a way that the desired 
flexibility could be achieved without invaliditing existing WFL jobs. 

In general, the MCP can best manage its workload when it has many tasks to run and few 
constraints on their location. Subsystem control is typically needed when a few dedicated 
applications consume a major fraction of the resources. For example, a site manager may assign 
a large database or dedicated application to a particular subsystem. It is anticipated that 
relatively few jobs or tasks should need SUBSYSTEM specifications, and very few of those should 
need a VISIBILITY specification. 

VISIBILITY Attribute 

A new task attribute, VISIBILITY, has been provided. It is used to ensure that a stack is 
sufficiently Global to provide visibility from any expected offspring or client stacks. There 
are four VISIBILITY states, with the following mnemonic values and semantics: 

UNSPECIFIED is the default. UNSPECIFIED is treated as MINIMAL in most situations, but it 
is treated as SUBSYSTEM for: databases, MCSs initiated by the datacom 
subsystem, and libraries initiated by the linker with SHAREDBYALL or DONTCARE 
speci f ied. 



MINIMAL 



means no visibility requirements are imposed; the stack will go as local 
poss ibl e . 



SUBSYSTEM causes the stack to be Global if the SUBSYSTEM specification contains more 
than one member, or is unspecifed; the stack will be local if a single local 
processor is specified. 

GLOBAL causes the stack to go into Global memory. 

VISIBILITY may be specified in WFL at the job or task level, and may be specified in CANDE as a 
run-time but not a compile-time modifier. It may be set or interrogated as an integer/mnemonic 
task attribute in ALGOL or COBOL, but can be set for only an inactive TASK. It may not be 
specified for a job queue. 

The VISIBILITY attribute is not inherited by an offspring task. 

If a VISIBILITY specification is incompatible with the requirement that a fully dependent task 
must be able to see its parent, the specification is disregarded but a warning message is 
displayed at the start of the offspring task. 

SUBSYSTEM Attribute 

The following changes have been made to the semantics of the SUBSYSTEM attribute: 

*' lT h ™«,5oS™ STEM va lV e is now inherite d by offspring tasks. That is, if the parent task has a 
iJinlvfJUI specification and the offspring has none, the offspring is given the same 
SUBSYSTEM value as the parent. A task may be forced into Global memory by a VISIBILITY 
specification without affecting its SUBSYSTEM specification, which can be inherited by its 
offspring. A SUBSYSTEM specification on a job queue will propagate by default to all the 
tasks of any job run through that queue. 

2. There is now a distinction between null and unspecified values; any SUBSYSTEM specification, 
including null, may be inherited. 

3. An assignment of the reserved SUBSYSTEM name "SYSTEM" is treated as an assignment of a null 
value. ° 

4 ' o, h ,£",, a ~ task or data base is bein 8 initiated with a SUBSYSTEM specification of (GLOBAL), the 
SF22Y? TEM ^? S reset to a nuU value and the VISIBILITY attribute treated as though it were 
GLOBAL. This action is taken whether the SUBSYSTEM was named "GLOBAL" or was an 
operator-defined name with the same specification. No subsystem specifying Global-onlv will 
ever be inherited. " 

Formerly, the SUBSYSTEM attribute was not inherited, but any offspring of a local task or job 
was forced into the same subsystem as its parent. Thus a local SUBSYSTEM specification could be 
applied to a job or task, forcing all its offspring into that same subsystem. 

SUBSPACES Attribute 

Fully dependent offspring tasks of swaptasks must be swaptasks; this rule no longer applies to 
semidependent tasks. A semidependen t swaptask may be swapped independently of its parent- they 
need not be resident at the same time, and need not occupy the same subsystem. 

If VISIBILITY causes a task to run in GLOBAL, any SUBSPACES specification is disregarded. 
Se 1 ec t i on 
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Here is a summary of the revised rules for subsystem selection. 

'■i:Wiar , ^ , *S , 2W.?i! ta, » , "Kir'^.^.~iSTr-«^.f'f:K , 2., , K'.. , 5S.=5 

subsy s tern. 
2. By default, all jobs and tasks go into local memory, except: 

a. MCSs initiated by the datacom subsystem ciiARFriRYAII or DONTCARE 

b. Libraries initiated by the linker with specification SHAREDBYALL or donivaku 

c. Database stacks , . , ■. 

d. Jobs which contain global-file equation (see below) 

be overridden in most 



Rule 2 is applied only if rule 1 has not forced the issue, and can 
cases by compiled-in SUBSYSTEM and VISIBILITY spec. f. cat .ons . 




"or".) 









SUBSYSTEM Definition 






VISIBILITY 
Value 





1 


1.2 


1,2,3 


G 


G,2 


G.1,3 


MINIMAL 


1/2/3 


1 


1/2 


1/2/3 


G 


2 


1/3 


SUBSYSTEM 


G 


1 


G 


G 


G 


G 


G 


GLOBAL 


G 


G 


G 


G 


G 


G 


G 



JOBS 




WFL Subroutines 
A 




Global-File Equation 

A 



A WFL iob can declare a file and then cause an offspring task to use that file by label 
.ii„ «f 7h, form ^intname>-=<file id>. Th is mechanism amounts to a hidden by-reference 

of its SUBSYSTEM and VISIBILITY attributes. 

In the 31 PR1 and subsequent releases, WFL marks all code files which do not use fl° b »l- f ;* L 



run in Global memory. 



CRITICAL BLOCK 



•critical block" which the parent task may not exit while 



IK no^eSce^^ 

The actual "parent" of a task is by definition the task whose process -cordis tack^contains 

fSSk fnitlat on dement tL ioal oc f I .^.dependent task may now be more global 
nan when Inat tasTwas considered simply dependent; thus the parent may even be a different 



s tack . 
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D3418 MCP-GENERAL - "GETSTATUS" WARNING MESSAGES 
On 



.,.. the Mark 34 system software release, the UNITREQUEST routine of GETSTATUS will no longer 
support CASE 29 (GSFIRMWARE) nor CASE 31 (GSPATHS) . Firmware information is now provided 
along with path information in the new CASE 41; until they are de impl emented, the former 
case values will be relatively expensive to invoke. See MCP-GENERAL note D3251 for a 
description of CASE 41. 

The warnings for DCALGOL programs are as follows: 
CASE 29 



"ON 34 GETSTATUS UNITREQUEST CASE 29 WILL NOT BE SUPPORTED 
(USE CASE 41)" 



CASE 31 

"ON 34 GETSTATUS UNITREQUEST CASE 31 WILL NOT BE SUPPORTED 
(USE CASE 41)" 

D3 500 MCP-GENERAL - CHANGES TO " SYSTEMSTATUS " CALLS 

Changes to the MCP required by modularization and the implementation of B6900 MLIP I/O have 
affected the Type 4 SYSTEMSTATUS call. 

The SYSTEMSTATUS Type 1 call will now report the proper MCP name after a CM# and when different 
MCF names have been specified for different processors on a B6800 Multiprocessor system. 

explained in the SYSTEMSTATUS Reference Manual, Form No. 5011786. The changes do affect 
existing programs, and the documentation should be examined carefully. 

D3501 MCP-GENERAL - USAGE INFORMATION FOR "I/O" DEVICES 



Several enhancements have been made to the collection of data on the usage of I/O devices The 

«xfxf«xi^A, r nAxI isib i e i° u the USer P rim » ril y 1" the SYSTEMSTATUS Intrinsic, though the 
SIAl IhllCALDATA word and the maintenance log entry have also been affected. 

For each unit, information is now available on the number of physical reads and writes the 
total bytes transferred, the total I/O time accumulated, and the number of read and'write 
errors. For each MPX/MLIP, information is available on the number of reads and writes the 
total bytes transferred, and the total I/O time for user tasks and non-user (invisible) stacks 
Inese statistics are accumulated continuously from the time of the last Halt/Load. 

The MPX/MLIP usage information has been added to the type 7 SYSTEMSTATUS call. The I/O device 
statistics are available individually in the type 4 specific unit call and as a group in a new 
r? h "avSii^x™ SYSTEMSTATUS interface for accessing this data and its format are explained 
in the SYSTEMSTATUS Reference Manual, Form No. 5011786. 

The current number of physical reads and writes and number of read and write errors have been 
added to the maintenance log I/O error entry. For MLIP entries, they appear in words 34 and 
35, and their format is described in MLIP note D3355. For MPX I/O error entries, a new type of 
unit dependent information entry has been created. The type field in the key word is 12 and it 
is followed by two words of I/O statistics for that device. Their format is: 

Word 1 [47:24] total physical reads since last H/L 

[23:24] total physical writes since last H/L 

Word 2 [47:24] total I/O errors in reads since last H/L 

[23:24] total I/O errors in writes since last H/L. 

Improvements were made to the computation of the unit reliablity factor, which is based on the 

device s error rate over the last 500 I/O operations. The reliability factor may be 

interrogated with the RF ODT input message. It is computed by subtracting the error rate over 
the last 500 I/Os from 100%. 

When the reliability of a device is degrading, the MCP will issue messages to inform the 
operator when the reliability factor declines to 95%, 90%, and for every 10% decline 
thereafter. 

»I™ CP °Pi ion 6, DIAGNOSTICS, is set, then these messages will be displayed as an operator 
RSVP, and activity will not be allowed to continue until the operator acknowledges the message 
with a <mix>OK input. This provides an opportunity to save or clear the degrading unit. 

The format of the STATISTICALDATA word which holds the information needed to compute a unit's 
reliability factor has been changed. The new format is: 

[47:10] error rate for the last 500 I/Os (multiplied by 1000). 
[37:17] number of errors since H/L or the last time the unit 

was made available (UA-ed) . 
[20:21] number of I/Os since H/L. Note that if the number of 

I/Os exceeds 2**21 - 1 (2,097,151) the high order bits 

will be t runcat ed . 
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are based on counting "normal" I/O activity. Some SP"'»' 

all error retry I/O is excluded. The pair of I/Os (seek 

ing from a conditional seek to pack on a MPX machine are 

I/O test operations are counted as writes, which may cause 

appear for read-only devices and some non-existant units, 
ly, for some unit types to show more errors than I/Us 

is updated when the I/O request i 



s finished, 



This 
wh i 1 e the 



is upaateo wnen me i/v/ i^ub.,. .» ...... , .-- - 

at in the error handling routines. Only I/O errors (not I/O 
e counted. An I/O condition is defined as the situation in 
oiler encountered a problem, but was able to execute the I/O 

is reported to the system and logged, but no error handling 



and the non-diagnostics MCP 



The I/O usage and error statistics 
MCP I/O, maintenance I/O, and 
initiated and data transfer) result 
treated as a single I/O operation, 
a small amount of write activity to 
It is possible, though very unlike 
is because the activity information 
error counts are updated before th 
conditions) which will be logged ar 
which the I/O device or its contr 
operation successfully. This event 
is required. 

D3 641 MCP-GENERAL - COMPILE TIME OPTIONS 

The compile-time options are set as follows in the MCP symbolic 
object file released to the field. 

INTERNAL RESET 

LINEINFO SET 

MCP SET 

STATISTICSET RESET 

DIAGNOSTICS RESET 

READLOCK RESET 

SWAPTRACE RESET 

OVERHEADCHARGED RESET 

LOCKTRACE RESET 

B7700 RESET 

ACTIVETIME RESET 

IAPEOP RESET 

PRESENCEBITCHARGED RESET 

USERDATATROUBLE RESET 

NODUMP RESET 

EXPERIMENTAL RESET 

MAKEHOST RESET 

The compile-time options are set as follows in the diagnostics MCP object file released to 
field. 

INTERNAL SET 

LINEINFO SET 

MCP SET 

STATISTICSET RESET 

DIAGNOSTICS SET 

READLOCK SET 

SWAPTRACE SET 

OVERHEADCHARGED RESET 

LOCKTRACE SET 

B7700 RESET 

ACTIVETIME RESET 

TAPEOP RESET 

PRESENCEBITCHARGED RESET 

USERDATATROUBLE RESET 

NODUMP RESET 

EXPERIMENTAL SET 

MAKEHOST SET 

The second function, which was to trap long and short I/Os, has been lett 
DIAGNOSTICS as was previously the case. 

REVERSEPAPERTAPE has been changed to a run-time option and will f unct i on **'•»!"„*• d *^ 
REVERSEPAPERTAPE compile-time option. The new run-t.me option is called NORVRSPAPERTAPE and 
option # 33. 

Any user who requires the NORVRSPAPERTAPE option to be -t should not i fy Burroughs as s oo . as 
KV&tu system so? tware^e 1 t^lSl , ^ape^ape ' re^r^wi . 1 be assumed to be capable of 
reverse operations. 



the 



A new column-2 compile-time option, INTERNAL, has been added, which is 
diagnostics versioS of the MCP and RESET to make a non-d. agnos t . cs version 



SET to make a 
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D3056 MCP - IDLE PATTERNS IN PRINTER DUMP 

The MCP often displays a recognizable pattern in the stack registers while waiting in an IDLE 
operator. A few patterns have been changed since the 31 system release. 

This note provides an annotated list of all the idle patterns displayed by the MCP (There are 
other instances of the IDLE operator, mostly very early in system initialization, that show no 
distinct pattern.) 

For the most common cases, the B6700 and B6800 have different patterns. B6700 patterns are 
designed to show one, two or four letters in the A, B, X and Y registers taken as a 12-bv-16 
dot matrix; those letters are shown here. 

B6800 patterns are shown as the hex value actually displayed in each register, except: 

■Xinenumber" means that the sequence number of the line in the MCP where the IDLE occurs 
is displayed in decimal. 



(a) 
(b) 



"RCW" means that the return-control-word of the procedure that contains the IDLE is 
displayed in raw form. 



(c) Occasionally some variable data are displayed, as noted. 
The Y register contents are unspecified unless the B register tag is 2. 

Significance (and location) 



B6700 



B6800 



C 
M 



D U 
M P 



D U 
M P 



D U 
M P 



D E 

A D 



D E 
A D 



D E 
A D 



2 AAAA1111AAAA 
2 AOOA0OA0OAOO 
2 BBBB11UBBBB 
2 B00B00B00B00 

2 A1111111111A 
2 A00A00A00A00 
2 B1111111111B 
2 B00B00B00B00 

2 CECECECECECE 
2 1 inenumber 
C3D440404040 

2 DBDBDBDBDBDB 

2 1 inenumber 

3 RCW 

2 DBDBDBDBDBDB 
2 I inenumber 
C7C5E3D9C4E2 

2 DDDDDDDDDDDD 

2 1 inenumber 

3 RCW 



A: 2 DEADDEADDEAD 
X : 2 1 i ne number 
B: 3 RCW 



2 DEADDEADEAD2 

2 1 inenumber 

3 RCW 

2 DDEADEADEADD 

2 1 inenumber 

3 RCW 



Normal idle during system 

i n i t i a I i za t i on . 
(PAWS) 



Normal idle. 
(PAWS) 



Changing MCP. 

(CHANGEMCP) 

"CM "in EBCDIC 

Normal idle during initiation 

and termination of dump. 
(LOITER of DUMPBOOTSTRAPPER) 

Dump waiting for system I/O to finish. 
(GETRDS of DUMPBOOTSTRAPPER) 
"GETRDS" in EBCDIC 

Normal idle during dump. 
(DPPAUSE of TAPEDUMP) 



System is hung, displaying 

"... PLEASE HALT LOAD" . 
(DEFUNCT) 

System is hung; some other processor 

is already in DEFUNCT. 
(DEFUNCT) 

System hung taking a dump. 
(SPOUTP OF TAPEDUMP) 



nev^r^a 1O r a r 8 on a the r B6700 CUr " ly dUr ' ng the ' " ' * ' al ' za * ' on of B680 ° multiprocessor systems and 
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B6800 



2 CCCCCCCCCCCO 
2 1 inenumber 
2 addressee proc 
2 message 

2 CCCCCCCCCCC1 
2 1 inenumber 
000000000000 

2 CCCCCCCCCCC2 
2 1 inenumber 
2 addressee proc 
2 message 

2 CCCCCCCCCCCF 

2 1 inenumber 

D3D4C5D9C7C5 = 



B6000 SERIES MARK 32 
Significance (and location) 



Lead processor waiting to send a 

message to a follower. 
(MAILACARD of SECONDARYINITIALIZE) 



Follower processor waiting for a message 

from the leader. 
(PICKUPMAIL of SECONDARYINITIALIZE) 

Lead processor waiting for follower to 

receive a message. 

(MAILACARD of SECONDARYINITIALIZE) 



Lead processor waiting for followers to 

complete initialization. (MERGER) 
"LMERGE" in EBCDIC 



u^s^slngle^eVof-^^^ 

?or hex difp.ay? wnile the X and Y registers are used as a b.t matr.x. 



X&Y 



M D 



M D 



Regi s ters 



A: 2 DEDEDEDEDED1 

X: 2 F424F0F88430 

B: 2 C961D6404040 

Y: 2 F000F0F1 12C0 

A: 2 DEDEDEDEDED1 

X: 2 F424F0F88430 

El: 2 dump address 

Y: 2 F000F0F112C0 



Significance (and location) 



Initial idle in printer dump. 
(DOIOP of MEMDUMP) 
"I/O" in EBCDIC 



Normal idle in printer dump. 
(DOIOP of MEMDUMP) 



N O 



N R 



N P 



FIN 



2 DEDEDEDEDEDO 
2 F610F0788870 
2 D7D9C9D5E3D9 
2 F086F0E111E0 



A: 2 DEDEDEDEDED2 

X: 2 F610F0788870 

B: 2 D9C5C1C4E840 

Y: 2 F086FOE111EO 

A: 2 DEDEDEDEDED3 

X: 2 F610F0F99960 

B: 2 D7C1E3C84040 

Y: 2 F086FOF0O000 

A: 2 DEDEDEDEDEDF 

X: 2 F9980F0F610F 

B: 2 C6C9D5C9E2C8 

Y: 2 F00OOFOF086F 



No printer is on line. 
(DUMPITP of MEMDUMP) 
"PRINTR" in EBCDIC 



Printer went not ready. 
(DOIOP of MEMDUMP) 
"READY " IN EBCDIC 



No path to printer. 
(DOIOP of MEMDUMP) 
"PATH " in EBCDIC 



Printer dump is finished. 
(DUMPITP of MEMDUMP) 
"FINISH" IN EBCDIC 



D3089 MCP - MEMORY DUMP TAPE RECORD FORMAT 

Memory dump tapes have been given a new format to 
recovery algorithm. The blocksize has been increased 
to the block. If TAPEDUMP encounters a parity error 
rewriting the block until the write is suceessf 
reading dump tapes is a normal phenomenon. 

DUMPANALYZER, when reading the tape, uses the record 
out copies and accepts only the last good record as v 

Since the MCP makes no attempt to erase badly written 
unrecoverable parity errors on a dump tape are 
suppresses all automatic retry and logging ot par l ty 
retry algorithm designed for the particular wr i 
performed. It backs up and rereads only when some re 
the sequence of record numbers indicates that a cor 
found . 



simplify TAPEDUMP's write parity error 

by one word and a block count is appended 

while writing a block, it continues 

ul . The occurrence of parity errors while 



count value stored in each record to sort 
al id data . 

records, but simply repeats them, a few 
a normal occurrence. The DUMPANALYZER 
errors on the input; instead, a simple 
ting mode used to create dump tapes is 
cord(s) have been read with errors, and 
rect copy of the given record has not been 
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D3094 MCP - AUTOPRINT CAN RUN IN LOCAL MEMORY 

For B6800 Multiprocessor systems, the MCP now forks Autoprint into the local memory of the 
processor which can see the printer. If a tape or disk file is PBed, the MCP forks Autoprint 
into global memory because a printer is not selected until the print file is examined for forms 
information or train requirements. 

If, during the printing of a job's BD files, Autoprint must switch printers due to forms 
requirements or trainid requirements, Autoprint moves its buffers to * GLOBAL tm Memory and 
completes printing for that job. Autoprint then goes to EOT to a 1 1 ow BACKUPQUEUER to fork an 
Autoprint in the correct local memory. 

* "GLOBAL Memory" is a trademark of Burroughs Corporation. 
D3095 MCP - INTRINSICS IN LOCAL MEMORY 

For B6800 Multiprocessor systems, the MCP establishes an intrinsics stack in each local memory 
that has visibility of the family which contains the intrinsic code file. Tasks are attached 
to the intrinsic stack of the memory in which they are running. Migrating SWAPPER tasks are 
attached to the intrinsic stack in * GLOBAL tm Memory. 

* "GLOBAL Memory" is a trademark of Burroughs Corporation. 
D3102 MCP - "BNA" "MCS" 

The initial implementation of an MCS to manage BDLC stations is released. 
D3122 MCP - IMPLIED CONCATENATIONS MADE EXPLICIT 

All implied concatenations of string constants have been made explicit by adding the 
concatenation symbol "|". Also, all strings that were concatenated have been made the same 
character type and all quote characters have been represented by the DEFINE QUOTE (=48"7F") In 
addition, the appropriate compiler options have been set such that the above syntax errors have 
been made violations, except for the use of the quote character which has been made a warning. 

D3141 MCP - DECODE ERROR SECTORS 

1. The sector where the error occurred is now decoded into cylinder, head and sector for packs 
for Log Maintenance. r 

2. The length of the extended result descriptor read and logged has been increased from 20 
words to 26 words. 

D3228 MCP - PRINTER DUMP HARDWARE INTERRUPTS 

Printer dump now has an interrupt routine for each system, which determines the system type and 
configuration. It does not reference MCP DO variables. 

D3281 MCP - ATTRIBUTE HANDLING 

Ti^fS' 10 *'" 8 task attributes m ay n <>w be set to "." without getting task attribute INCORRECT 
SYNTAX errors: 

BDNAME 

CHARGECODE 

DESTNAME 

D3282 MCP - VIRTUAL MEMORY SIZE STATISTICS 

Additional data has been added to that already returned for SYSTEMSTATUS Case 2. Words 41 and 
42 of each group reported give the virtual memory size for batch and swap jobs, respectively 
The virtual memory size for batch tasks is the total number of words of overlay disk space 
actually in use. The virtual memory size for swap tasks is the sum of the total number of 
words of overlay disk space actually in use and the number of words of disk occupied by 
swapped-out swap tasks. Batch virtual memory size is calculated and reported for each box on 
the system. Swap virtual memory is reported only for the "global" box, as it is impossible to 
determine into which box a swap task will be returned on multiprocessor systems. 

D3309 MCP - "ITINERARY" TASK ATTRIBUTE 

A new task attribute, ITINERARY, has been implemented, which is read only to the user and 
contains a record of the task's foreign ancestry. 

Syntax : 

<hos tname> I 
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Semant ics : 



task, the next entry in the Btr «■«£•* e inherited from parent to sibling verbal. m when 
.^'parent' ancV oJi% r^™ * « ' n TpInERARY I? Hbute^ch""^!' 'Son^n" tne 

ft,.?' ?X." B !^°^.£^5:nr«."«™"»« • ™ boundary (i.e., a parent starts a sibling 
at some host other than the host where the parent is running). 

Ex amp 1 e : 

The following table shows the contents of the ITINERARY attribute for four related tasks. The 

relationship of the tasks is as follows: 

Task A is started on host BLUE 
Task A starts task B on host YELLOW, 
Task B starts task C also on host YELLOW, 
Task C starts Task D on host RED. 

Task ITINERARY string of TASK 

"a~ NULL (i.e. " . " ) 

B BLUE 

c BLUE 

D YELLOW, BLUE 

D3379 MCP - SET LIBRARY FUNCTION 

l ji .h. ci /•«»* lihrnrvl ODT message has been implemented. It manages the 

Iable OU of ne "funcUon e names" ^no the'! .Sra?f" functfon" stacks. ?See GENERAL note D3356 for a 

description of the SL message.) 
D3381 MCP - IMPROVEMENTS TO WORKING SET SHERIFF 

Several improvements have been made to the operation of the Working Set Sheriff. 

1. When initiated, all tasks receive a default overlay goal which is a func * '"" ^ the ^ 

system overlay goal is changed. 

Si' ^ffect^s^esplci^y no1?ceabU wnen^f K.S? f 'I.' ft.!' XMlF - £1? !g ^lr 

Iv^rlay goal was ze?o? and'al? running tasks had a default overlay goal of zero. Thus the 
previous code would allow them to continue executing unaffected by the Sheriff. 

•- ?Sp2s::-*i?-.£: sr:.=:Il:^at^tTtssv^ £ 'iv £ :I 5 ^K^is" : •SiSia , ' s ^ : ':^sI?^ a S 

is the minimum amount of available memory desired by the Sheriff. MEMMIN is computed 
AVAILMIN percent of the amount of usable memory. 

;:.?»£,: "SEUWi'iiSi *,■:::; I'-f.zsv,^'^ s:».-:ttrt?;...tii. 'ss 

rule is unchanged from previous releases. 

If AVAIL < MEMMIN, new tasks will not be started (unless FS-ed) . This rule is unchanged 

from previous releases. 

If AVAIL < 5 * MEMMIN, the Sheriff will start suspending tasks in order to i ""ease the 

amount of availabU memory. On previous releases, this process started as soon as AVAIL < 

MEMMIN. 

The effect of changing the rule for suspending tasks is to smooth the action of the *° r king 

5i,Hi:!!. : ? : i^ , v. , :^n'=! , :wi"-.K*.K , "'=s™i «-° :s':tt:\::- k u- : 

chance to work and has not been sufficient. 

For this last change to be properly effective, AVAILMIN must be set to a value sufficiently 

high (5« to 10%) tnat MEMMIN has ."reasonable value (101 to 20K words minimum). 

4. When resuming tasks it has suspended the Sh.r i f f j ooks f i , s t f or those with^.h. highest 

will be resumed . 
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5. The MCP procedure which implements the Working Set Sheriff, WSSHERIFF, has been rewritten 
for greater clarity and efficiency. 

D3386 MCP - NEW USERDATA ERROR CODE "(42)" 

The error code 42 has been added to USERDATA error codes. 

Add the following paragraph to the SOG Reference Manual, Volume 2 (Form No. 5001688) on Paee 
9-5-14, after Code 41: B 

"42 EUDLLGT A locator has been passed with a null (0) value in UDLLENGTHF when the 

USERDATAREBUILD function needs a value GEQ 1." 

This new error detection will prevent a processor loop. 

D3399 MCP - "CM" VS. DUPLICATED MCPS 

The CM ODT message has been changed to simplify and accelerate the creation of duplicated MCPs 
Formerly, when an MCP was to be duplicated (or triplicated), CM always created a brand new file 
for each family index involved. This is no longer required. Now, CM messages of the followine 
forms : e 

CM < f i 1 ename> . . . 
or 

CM <filename>/FMLYINX <nnn> . . . 

are handled as follows: 

1. CM locates the specified file using the full name given in the command. 

2 ' 9 M f ? hen makes a ,ist of the filenames that are required for each family index If 

<filename> FMLYINX<nnn> " is specified, it is used as one of the copies and copies are made 

on other family members as required. If "FMLYINX<nnn> " is not specified, CM appends the 
correct member for each family index. 

3. CM then attempts to locate the required file for each member. If a file is found and the 
code files are "identical" (as determined by the compiler timestamp), that file is used for 
that member; otherwise, a new file is built for that member. 

4. CM then copies or moves rows as required and continues with normal CM. 
D3400 MCP - ANALYZE LIBRARY PARAMETER MISMATCHES 

When a parameter mismatch is discovered during library invocation, additional information is 
now supplied to assist in finding the source of the mismatch. 

D3409 MCP - "IAD" NOT SUPPORTED ON "B6900" 

^™ lla i ion Allocated Dj s k (IAD) will not be supported on new systems, starting with the 
?£ 2™ prevent Hi use the following changes have been made. When running on a new system, 
the MCP procedures WRITEHEADER, COPYINT, EXCHANGEINT, RESERVEANDRESTORE , and DISKPACKCONFIGURE 
no longer allow the creation or updating of IAD files, areas, or packs. The RC Operator Input 
Command displays "IAD ILLEGAL ON NEW MACHINE" if it is specified and rejects the request The 
REServe Operator Input Command no longer defaults to IAD and, if "AS BADDISK" or "AS MAINT" is 
not specified, displays "AS EXPECTED" and rejects the request. The DCALGOL WRITE Diskheader 
intrinsic will not update an IAD header and returns an error value of 17. The DCALGOL COPY 
lvXL\?,M, C r eturns . an e rr <>r value of -99 and will not move data to/from IAD areas. The ALGOL 
fcXCHANGE intrinsic will not exchange the rows of two files if either one of them is IAD. The 
program SYSTEM/ I ADMAPPER has been modified to handle the new error value returned bv the WRITE 
Diskheader intrinsic. 

D3411 MCP - PRIORITY, "Dl " INFORMATION 

A word containing the full priority (bias, declared and fine) field for the task has been added 
to the end of the SYSTEMSTATUS general mix information. 

A word containing the STACKINFO data and the RUNNINGCOUNT for the task's Dl stack has been 
added to the end of the SYSTEMSTATUS specific mix information. 

Full documentation of the location and layout of these words is contained in the file 
SYSTEMSTATUS/DOCUMENT on the SYSTEMNOTEs" tape. Instructions for prin!"ng the file are 
contained in GENERAL note D3205. 

D3425 MCP - DELETE "PORTS, SIGNALS" 

Attributes and mnemonics for PORTS and SIGNALS have been removed. In addition the PORTS 
mnemonic for the task attribute OPTION has been removed. 
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D3468 MCP - LOG NEW OPEN, CLOSE INFORMATION 

A new word has been added to the open and close log records. This new word contains the 
JarameTer information for the open and close routines Until the Mark 33 release, this new 
information will be mapped onto old values and stored in the "o d" parameter information field 
of the log; record. Mark 32 log records will contain both the old and new values. 

The 9th word of the open log record has the following format: 

VALID SUB FILE = [46:1] - TRUE IF THE SUBFILE FIELD IS VALID. 



SUBFILE 
TYPE OF OPEN 



= [39:8] 



THE RELATIVE INTEGER SUBFILE INDEX. 



POSITION 



= [ '/:«] 

1 -> OPEN WAIT 

2 -> AVAILABLE 

3 -> OFFER 

4 -> RESIDENT 

5 -> PRESENT 

6 -> PBT REEL SWITCH OPEN 

7 -> STACK ASSIGNED OPEN REVERSE 

= [15:8] 

1 -> AT FRONT 

2 -> AT END 



MOTION = [23:8] 

1 -> MOVE IT 

2 -> DON'T BOTHER 

The 15th word of the close log record has the following format: 

VALID SUB FILE = [46:1] TRUE IF THE SUBFILE FIELD IS VALID. 



SUBFILE 
DISPOSITION 



[39:8] THE RELATIVE INTEGER SUBFILE INDEX. 



ASSOCIATION 



CLOSE TYPE 



= [23:8] 

1 -> REWIND 

2 -> NOREWIND 

3 -> SAVE 

4 -> LOCK 

5 -> PURGE 

6 -> CRUNCH 

7 -> HERE 

8 -> BLOCKEXIT 
= [15:8] 

1 -> RELEASE 

2 -> RETAIN 

3 -> RESERVE 

4 -> DISABLE 

= [ 7:8] 

1 -> REGULAR CLOSE 

2 -> REEL CLOSE 

3 -> DONT WAIT 



After the Mark 32 release, the fields which contained the open and close types (word 7, [15:8] 
of the open and close records) will be returned to system; the values contained in them cannot 
be guaranteed as being correct. 

D3480 MCP - INTRINSIC MAPPING 

MISSING TEXT 

D3483 MCP - "DONT CARE" LIBRARIES 

Libraries with a sharing type of DONT CARE have been implemented. Libraries of this class are 
treated the same as libraries of sharing type SHAREDYBLL, except when running on a B6800 
Multiprocessor system. In that case, a copy of the library will be initiated in each memory 
subsystem (one in the local memory of each processor and one in global memory). Within each 
memory subsystem, the library will be shared by all tasks within that subsystem. Migratory 
swaptasks will use the library in global memory. 

D3484 MCP - "USECATDEFAULT" VS. "DIAGNOSTICS" 

The SPO option USECATDEFAULT is now available on both DIAGNOSTIC and non -DIAGNOSTIC MCPs . 
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D3485 MCP - "OPEN" FUNCTION VALUES 



The values returned by the OPEN function (and the AVAILABLE attribute) now include the 
fo 1 1 owi ng : 

38 = UNREACHABLE HOST 

40 = ALREADY OPEN 

42 = BADSUBFILE INDEX 

D3487 MCP - "MCP" CODE FILE ROW SIZE = "504" 

The MCP no longer has any code segments large enough to require that the MCP code file have a 
row size of 1008 disk segments. 

The NEWP compiler and the BINDER will now construct an MCP code file with a row size of 504 
segments, as is done for other code and symbol files. 

D3502 MCP - SHRINK FROZEN LIBRARY'S STACK 

When a library (except MCP) freezes, the stack is shrunk, returning the unused portions to the 
system. Before the library unfreezes, the stack is expanded. 

D3516 MCP - LIBRARY FUNCTION NAMES 

When linking to a library, the linker will now use the " f unc t i ont ab 1 e " and the LIBACCESS and 
LIBFUNCTION attributes when deciding to which code file it should link. 

D3529 MCP - "PARTNER" , "EXCEPTIONTASK" REMOVED 

Both SYSTEMSTATUS and GETSTATUS attempt to report the mix number of a task's PARTNER and 
EXCEPTIONTASK as part of the information they return about a task. 

There is no safe and efficient way to determine this information. Attempts to do so could 
cause faults in SYSTEMSTATUS, GETSTATUS, and other parts of the MCP. 

Since this information is of minimal use, it has been eliminated from the data returned. A -1 
is returned in the places where these items previously occurred. 

D3536 MCP - "SYSTEMSTATUS, IOTRACE" FOR "MLIP" 

The implementation of IOTRACE for MLIP machines is similar, but not identical, to that for 
multiplexor machines. A primary difference is that a logical rather than physical result 
descriptor word is returned. The format of the MLIP IOTRACE data is fully described in the 
SYSTEMSTATUS Reference Manual, Form No. 5011786. 

D3548 MCP - "DBS" IN LOCAL MEMORY VS. NONEXCHANGED UNIT 

If a Mark 31 or earlier data base has a SUBSYSTEM specified, and the processor selected from 
that subsystem has no path to the units containing the ACR codefile, any program attempting to 
open that data base will now get a DMOPEN error #53. 

D3 5 50 MCP - ELIMINATE "DL" NETWORK 

On the Mark 31 release, the NETWORK modifier of the DL ODT input message was used to specify 
the packname for the Host Services library codefile, the default file title for which was 
•SYSTEM/HOSTSERVICES. On the Mark 32 release, this mechanism has been eliminated. The SL ODT 
input message is now used to specify the file title and packname for the Host Services (and 
Network Services) library. The function name is BNASUPPORT. For details, see the description 
of the SL ODT message in GENERAL note D3356. 

D3551 MCP - PASSWORD MANIPULATION 

Two changes have been made in the mechanisms for changing passwords: 

1. The ability to change password via the USERCODE task attribute has been eliminated in the 
Mark 32 MCP. (If T. USERCODE = "U" , a statement to replace T. USERCODE by "U/P" was 
interpreted as a request to install "P" as the password in the USERDATAFILE entry for "U" . ) 
This obscure feature is not in any current documentation, and was usually invoked 
inadvertently. (For example, successive assignments of the same usercode/pas sword resulted 
in the second assignment being interpreted as above, sometimes with unexpected results.) 

2. Any password-change action must specify the old password as well as the new one. This 
affects a change in the specification for the PASSWORD statement in WFL; the PASSWORD 
command in CANDE already requires the old password. For example, if user U has password P, 
the following WFL job will change the password to Q: 

JOB CP; USER=U/P; PASSWORD=P/Q; END JOB 

On the Mark 31 MCP, the statement PASSWORD=Q is enough. On the Mark 32 MCP, this older form 
will be allowed but a warning message will be produced: "PASSWORD CHANGE ON THE 33 RELEASE 
WILL REQUIRE THE <OLDPW>/<NEWPW> FORM." On the Mark 33 MCP, the old form will be disallowed; 
any non-privileged program which uses the old form will be terminated with a "security 
v i ol a t i on " . 
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Specifically, the USERDATA intrinsic is being changed: forms (a) and (f) are being 

eliminated from function (6), as described in SOG Reference Manual, Volume 2 (Form No. 

5001688), Page 9-5-7. The other four forms, (b) through (e), remain available through 

USERDATA, CANDE and pre-29 WFL; forms (c) and (d) are unusable in WFL because of the "=" and 
"+" codes . 

Password assignments through the MAKEUSER utility continue to function as specified; this 
mechanism uses USERDATA function (7) which remains unchanged. 

D3564 MCP - "WFL" TASK FAULT ACROSS NETWORK 

The WFL construct "ON TASKFAULT" is now supported across networks. 

1)3573 MCP - "PBIT" TIME ACCOUNTING 

The processor time and count of the presence-bit operations requested by each task are now 
accounted for by the MCP. These values are available via the CONTROLLER TI ODT message and are 
also recorded in the job log. The times are separated into two categories: INITPBIT, P-bits on 
virgin data or code segments, and OTHERPBIT, P-bits on overlayed data or code segments. The 
cost of a presence bit operation is charged to the process that requested the operation, not to 
the process that owned that data. The cost of P-bits for tasks which are not logged 
(independent runners) are charged to the MCP stack when that task goes to EOJ . The accumulated 
cost of P-bits on currently-running tasks is available through the SYSTEMSTATUS interface (see 
MCP note D3576). The effect of the PRESENCEBITCHARGED MCP option is that the INITPBIT and 
OTHERPBIT times are added to the processor time. On the Mark 34 MCP, this option will be 
eliminated. Installations that use this feature need only modify their accounting programs to 
add in these two extra categories. 

D3576 MCP - "PBIT" TIME ACCOUNTING 

Four new words have been added to the specific mix information part of SYSTEMSTATUS cases 3 and 
9. These words fall at the end of the entry and are located after the Dl stack STACKINFO word. 

The new words are the following: 

INITPBITTIME: The processor time used to process initial P-bits. 
INITPBITCOUNT: The number of initial P-bits processed. 
OTHERPBITTIME: The processor time used to process all other P-bits. 
OTHERPBITCOUNT: The number of other P-bits processed. 

1)3579 MCP - PROCESSKILL EVENT ERRORS 

Event valued file attribute errors are now fatal. If an error occurs in Attgrabber while 
attempting to get an event attribute, the user is processki 1 I ed to prevent him from calling 
WAITP with a bad event reference. 

D35 8 3 MCP - DUMP ACROSS MIDNIGHT 

The date may not be updated across midnight if the system is dumping during that time. Users 
concerned with the problem should set the OKTIMEANDDATE option (system option #24). 

D3594 MCP - REPLACE LOGGING OF "ORGHOST" BY "ITINERARY" 

Because of the replacement of the task attribute ORGHOSTNAME by the task attribute ITINERARY, 
the logging of the ORGHOSTNAME attribute in DOT and EOT log records has been replaced by the 
logging of ITINERARY, as follows: 

BOT WORD EOT WORD CONTENTS 



17 28 Link to the value of the ITINERARY 

chain. The length field in these 
words is in characters rather than 
words . 

D3595 MCP - INTRINSIC TO SUPPORT LIBRARY MAP 

Most intrinsic references from existing code files are now mapped to the appropriate entry 
point in the appropriate support library (GENERAL, BASIC, PLI ) . The references that are mapped 
ar e : 

1. All BASIC support entry points 

2. All PL/ I support entry points 

3. All mathematical procedures for ALGOL, FORTRAN and PL/I. 

All other intrinsic references continue to cause linkage to SYSTEM/INTRINSICS. The support 
libraries (GENERALSUPPORT, BASICSUPPORT and PLISUPPORT) must be properly SLed via the new (on 
Mark 32) SL ODT messge (described in GENERAL note D3356) . 
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P L/ I was changed on the Mark 30 PR1 release so that the compiler references 
ATTRIBSEARCHER; therefore, ATTRIBSEARCHER has been deleted from the PL/I intrinsics. 



D3606 MCP 



"OFFSET" AND "DELTA" 



the MCP's 



The OFFSET intrinsic has been rewritten to run much faster. It has also been changed to be 
consistent with DELTA and other pointer operations, by reporting single- and double-word 
pointers in units of eight-bit characters, instead of in 48-bit words. 



The DELTA intrinsic is now much faster for the non-optimal cases, 
for all proper uses. 



Its values remain unchanged 



The 
es some 



The following section of this note provides functional definitions of OFFSET and DELTA 
next section calls attention to the changes in specifications. The final section provid 
comparative timings. 

DEFINITIONS 

OFFSET(<pointer expression;.) is an INTEGER function; its value is the character index of the 
pointer. Thus if P is a pointer at the Nth character in some array, OFFSET(P)=N (relative to 
zero). For EBCDIC, ASCII, BCL and HEX pointers, OFFSET is reported in units of 8-, 8-, 6- and 
4-bit characters, respectively. For single- and double-word pointers, OFFSET is reported in 
8-bit units. (Such pointers are produced by the POINTER(<array> , 0) constructs and by coercions 
of arrays into pointers; they are transformed into character pointers by a skip (e.g. P:=P+1) 
or by update from any operation except REPLACE ... WORDS.) 



DELTA (<po inter 
expression 2>) 



expression l>,<pointer expression 
- OFFSET(<point er expression 1>)). 



2>) is equivalent to (OFFSET(<point er 



CHANGES IN SPECIFICATIONS 



The new OFFSET differs from the former implementation by reporting eight-bit characters, rather 
than 48-bit words, for pointers which are single- or double-word descriptors. Consider the 
following example: 

ARRAY A[0:14]; 

DOUBLE ARRAY DA[0:9]; 

POINTER P,Q; 

INTEGER I; 

P:=A[5]; 

Q:=P+1; 

I:=OFFSET(P); %old: I:=5 new: I:=30 

I : =OFFSET(Q) ; % both: I : =3 1 

I:=DELTA(A[0],P) ftboth: I : =30 

I:=DELTA(P,Q); % both: I:=I 

P:=DA[5]; 

REPLACE Q:P BY "XX"; 

I:=OFFSET(P); %old: I: = 10 new: I : =60 

I : =OFFSET(Q) ; % both: I: =62 

I:=DELTA(DA[0],P); % both: I: =60 

I:=DELTA(P,Q); %both: I:=2 

Because of the change in specification for OFFSET, the MCP provides a warning message if OFFSET 
is passed a word-mode pointer with non-zero index: 

■OFFSET' NOW REPORTS 8 -BIT CHARACTERS FOR WORD POINTERS: 
SEE MCP NOTE D3606. 6 <address> 

The <address> is a line number or RCW of the first use of OFFSET with a word pointer; only one 
message is given per task. 

The new specification of DELTA is based on the number of characters 'before' the pointer 

(OFFSET), while the old was based on the number of characters in the array 'after' the pointer. 

There is no difference in the result for proper uses of the function, as in the prior example. 
The following extension of that example shows two abuses of DELTA: 



=A[10]; 

=POINTER(A[10],4)+3; 

=OFFSET(P); % old: 

=OFFSET(Q); % both: 

=DELTA(P,Q); % old: 
=POINTER(DA[5]); 

=OFFSET(Q); % both: 

=DELTA(P,Q); % old: 



= 10 



=-27 



=60 
= 123 
=63 



I: =30 



I: =60 
I:=0 



In the first case, DELTA is nonsense because one pointer is 4-bit and the other is (by default) 
8— bit. In the second case, DELTA is nonsense because the pointers are into different arrays. 
The new definition is consistant, in that DELTA(P.Q) always equals OFFSET(Q) OFFSET(P) , but the 
function is still intended only for use with two pointers with the same granularity, into the 
same array. 
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TIMING 

Following are timing comparisons of several cases. The first column shows the ratio of 
processor time for the construct in the Mark 32 implementation to that in Mark 31. The second 
column shows the processor time for each construct in the Mark 32 implementation relative to 
the time for simple OFFSET. (Measurements on the B6800 and B6700 were consistent.) 

OFFSET unsegmented array 

OFFSET segmented array 

DELTA like pointers, same segment 

DELTA one 8-bit, one word; same segment 

DELTA like pointers, different segment 

* The time for a segmented array case increases by about two 
microseconds for each segment between the beginning of the 
array and the pointer. 

D3609 MCP - COMPLEX "WAIT" WITH ZERO TIME PARAMETER 

The complex WAIT statement with a time parameter of zero does not evaluate the events as it did 
on the Mark 30 release. As a result, the wait always returns by the timeout of the time 
parameter. For example, 

I :=WAIT((0,EV1) ALGOL 

I:=WAIT((0,EV1) GIVING I COBOL 

always returns a value of 1 in I. 

D3617 MCP - COMPILE TIME OPTION " OVERHEADCHARGED " 

As part of the effort to reduce the number of MCP compile-time options, the OVERHEADCHARGED 
option and its effects will be eliminated on the Mark 34 release. 

When OVERHEADCHARGED was set, whatever task was currently active would be arbitrarily charged 
with the processor time required by the MCP to perform overhead activities requested by another 
processor. This made the task processor times highly variable and mix dependent, and resulted 
in tasks being charged for processor time that was completely unrelated to their activity. 

On the Mark 33 release, compiling an MCP with the OVERHEADCHARGED compile-time option set will 
cause a warning message to appear in the compile listing. 

D3618 MCP - "COBOL74" VS. "WORD" MODE FILES 

When a COBOL program opens a file whose MAXRECSIZE and BLOCKSIZE are multiples of 6, the MODE 
of the file is changed to WORD and the MAXRECSIZE and BLOCKSIZE of the file are adjusted 
accordingly. On output files, this modification is externally visible in disk headers and tape 
label s . 

Code files produced by the COBOL74 compiler now identify themselves to the MCP with a different 
language type. For these types of code files, no such modification of the attributes of the 
file are made . 

Code files produced by the COBOL compiler continue to work as described above. 

D3619 MCP - " SYSTEMSTATUS " TYPE "4" GENERAL UNIT REQUEST 

When a SYSTEMSTATUS Type 4 Unit Information request is made with the V2 parameter > .255, it 
returns one word of information for each unit on the system. If V2 <= 255, detailed unit 
information for physical unit number V2 is returned. 

On the Mark 33 release, the SYSTEMSTATUS Type 4 General Unit request with V2 > 255 will be 
de-implemented. The Type 4 call will then only return detailed unit information for the unit 
number specified in V2 . 

General Unit information is now provided by the Type 13 call, implemented in the Mark 32 
release, which is described in the SYSTEMSTATUS Reference Manual, Form No. 5011786. 

On the Mark 32 release, a warning message is given the first time a program calls SYSTEMSTATUS 
Type 4 with a V2 parameter > 255, as follows: 

"WARNING - SYSTEMSTATUS TYPE 4, V2>25 5 DE- I MPLEMENTED ON 33" 

De-implementation of the Type 4 General Unit Request will also cause elimination of the Type 
General Information request, since Type assumes availability of the Type 4 information. No 
special warning of the Type de-implementation will be given, since any call on it will 
produce the warning for Type 4. 
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D3620 MCP - HOSTNAME IN HEADING 



The hostname of the dumping system is now printed with the dump heading. 

D3652 MCP - LIBRARIES VS. "??DS", CM , RECONFIGURE 

Frozen permanent libraries will no longer be DSed by the ??DS primitive ODT message. They may 
still be DSed by supplying the mix number in the form "<mix no> DS". To avoid the need to DS 
permanent libraries prior to CM or RECONFIGURE, those libraries will not be accounted for in 
MIXCOUNT; thus, CM and RECONFIGURE are permitted with frozen permanent libraries (with no 
users) still in the mix. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 

MCP 

P253 8 MCP - SPURIOUS "PACK IN USE" MESSAGE 

On a B6800 Multiprocessor system, a spurious PK.<nn> IN USE message would occasionally be 
generated, as well as a spurious SECTORS REQUIRED message. These problems have been corrected. 

P2625 MCP - PRINTER DUMP LOOP 

Occasionally, the raw printer dump program would go into a loop doing futile outputs to the 
printer, which never moves. The problem occurred only when the paper had been left aligned at 
the end-of-page line; this has been corrected. 

P2765 MCP - SEEK LOST MESSAGE 

When a seek has been timed out by CHECKFORHUNGIOS, a message to this effect is now displayed. 

P2766 MCP - PRINT ENTIRE BUFFER IN " PROGRAMDUMP " 

In the past, the PRINTBUFFER routine in PROGRAMDUMP would print only the amount of data 
specified by AREADESC in the IOCB. Now the entire buffer is dumped. 

P2770 MCP - NON-MCS "DCWRITE" 

DCWRITE now allows a stack not marked as an MCS to do the DCWRITE, providing the last user 
procedure is from a stack that is marked as an MCS. 

P2773 MCP - HUNG LIBRARY MAINTENANCE AFTER "I/O" ERROR 

If an I/O error occurred during the compare portion of a COPY&COMPARE involving tape, the 
Library Maintenance task might hang waiting on a event which would never be caused. This would 
hang the tape drives involved in the copy portion as well. This problem has been corrected. 

P2790 MCP - "RESTORE" VS. "DS" 

DSing a RESTORE of an IAD pack occasionally caused an INVALID OP in PACKMOUNT. This problem 
has been corrected. 

P2792 MCP - HALTING "DCP 0" IN "SECONDARYINITIALIZE" 

During the development of the Mark 31 MCP, a line of code was accidentally dropped from 
SECONDARYINITIALIZE. As a result, DCP was not being halted during the Halt/Load sequence 
prior to running memory confidence. Were DCP to alter memory during this period, it could 
have caused the Halt/Load to fail and have to be reinitiated. This potential problem is now 
el iminated. 

P2856 MCP - "DISCSTATUS" VS. "BLASTUNIT" 

Occasionally, an I/O error in DISCSTATUS would cause the I/O queue for a disk unit to be 
corrupted. This problem has been corrected. 

P2859 MCP - "UNITSTATISTIC" 

The STATISTICALDATA array (available through SYSTEMSTATUS) would often show the total of I/O's 
since the last Halt/Load to be decreasing. This problem has been corrected. 

P2862 MCP - "JOBDESC" COMPLEMENT 

COMPLEMENTOR now tests for valid lengths in JOB DESC records and faults with DIV BY i f a zero 
length is found, thus preventing possible loops. 

P2865 MCP - "SYSTEMSTATUS" (11): "SWAPPER" PARAMETERS 

The SYSTEMSTATUS type 11 call has been corrected to return the documented number of words. 

P28 77 MCP - DUMP MECHANISM 

The dump reason "MEMORY TESTOR" has been changed to "FORCED MANUALLY". This notation is used 
for dumps forced either by the planting of an IRW to 0,14 at M[D0+3] or keying the following 
into the P register: MKSTjNAMC , 14 ; ZERO ; ZERO ; ENTR . 

P287 8 MCP - BAD MOMADDRESS 

CONTROLCARD created a bad momaddress problem when being called with a DCALGOL parameter type 
that was invalid or incompatible with the request. This problem has been corrected. 
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P2892 MCP - "FORGETCHECK" 

The efficiency of the procedure FORGETCHECK has been improved. 
P2893 MCP - SINGLE BIT ERROR LOGGING 

The MCP now handles the logging of single-bit memory errors more efficiently. 

P2896 MCP - "COPY" VS. " FAM I LY I NDEX " 

When copying a file from tape that had FAMILYINDEX set for one or more rows, Library 
Maintenance would often blow up. This problem has been corrected. 

P2914 MCP - RECORD SEQUENCE 

Library Maintenance puts a record number in the first word of every tape record, which is 
checked when reading from tapes. If a mismatch occurs, Library Maintenance now issues the 
following message: 

MT<nnn> EXPECTED RECORD <nnnn> BUT WORD I&2 OF RECORD=<xxxxxxxxxxxx> 

P2919 MCP - SEND MESSAGE TO LOCAL "DBS" 

Doing a <DBS stack number) SM for a DBS that is in a local memory on a B6800 Multiprocessor 
system no longer results in an invalid program word interrupt. 

P2920 MCP - MEMORY MANAGEMENT 

On a B6800 Multiprocessor system, GETSPACE would occasionally fault when the area at the bottom 
of a local memory was not a save area. This problem has been corrected. 

P2921 MCP - SAVING MEMORY MODS 

Aborting an attempt to save a mod of memory (by an RY of that mod) will no longer result in 
some chunks of that mod being marked "UNAVAILABLE". 

P2924 MCP - PROCID VS. "M[MSGADDR+3 ] " 

The MCP now displays the correct PROCID for General Control, Alarm, Hardware and SDI 
interrupts. The display has also been shortened, causing the P3 word to remain on the system 
ODT. 

P2925 MCP - MEMORY MANAGEMENT 

Small chunks of save memory, created when controlcards were entered at the ODT, are no longer 
left around in memory. 

P2927 MCP - "7-TRACK" LIBRARY TAPES 

Copying from a 7-track library tape no longer causes Library Maintenance to fail. 
P2929 MCP - "RECONFIGURATION" 

RECONFIGURATION now works properly when the Halt/Load unit is 5N disk. 

P295 8 MCP - "RESOURCECHECK" 

A problem that caused 7-track tapes to be unusable when the option RESOURCECHECK was set has 
been corrected. 

P2959 MCP - OVERLAY FILE CORRUPTION 

A problem that could cause data corruption in the MCP overlay file on B6800 multiprocessor 
systems has been corrected. 

P2961 MCP - INCORRECT FAMILY SUBSTITUTION 

When finding a file, the MCP was indicating in the "NO FILE" message the family substitution of 
the process finding the file rather than the process owning the file. This problem has been 
corrected. 

P2963 MCP - "SUPERPLUCK" HANGS/DUMPS VS. "SCHEDULED" 

An error has been corrected that could cause a con t rol -s t a t e loop or memory dump in the MCP 
procedure SUPERPLUCK when a SCHEDULED task was XSed. 

P2994 MCP - PARAMETER MISMATCH 

A parameter mismatch occurred when, in a FORTRAN program, a function or subroutine had an array 
name as a dummy parameter and it was called with an array element to an actual parameter. This 
problem has been corrected. 
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P3002 MCP - REMOVE "B6700 FINDMEMORYPARITY" 

When a B6700 processor detects a memory parity error (and the s top-on-par i ty switches are off), 
the MCP no longer attemps to locate the word in error by accessing every word in memory. The 
logged error address will always be zero. 

There has been no change for the B6800. 

P3019 MCP - "NOT READY" "RSVP" 

When an inuse disk goes not ready, DISKPACKER will now put out a "NOT READY" RSVP to alert the 
operator . 

P3020 MCP - ATTRIBUTE HANDLING FOR DATA BASE 

The appropriate routines for run-time data base attribute handling have been added to the MCP. 

P3024 MCP - "MOVE" VS. DISK PACK TYPE "206" 

Disk pack type 206 does not report correct unit type if it is not ready; therefore, UNITMOVER 
has to wait until the destination unit becomes ready before comparing unit densities. This 
problem has been corrected. 

P3025 MCP - "DUMPANALYZER" RECOGNIZES FROZEN "MCP" 

When the MCP froze as a library, DUMPANALYZER did not recognize the stack kind literal. The 
value array STACKKINDS now has the stack kind literal of "FROZEN MCP". 

P3027 MCP - "STARTSYSTEM" 

PRESERVE* and STARTSYSTEM have been corrected so that a configuration file can be changed (via 
ACQUIRE/FREE) before the catalog family is found. Now the operator may ACQUIRE the unit that 
has the catalog, Halt/Loa'd and have the system locate the catalog family. 

P3028 MCP - CHECK FOR LIBRARY CAPABLE 

The MCP never checked to ensure that a program it was initiating as a library was 
library-capable. This problem has been corrected. 

P3029 MCP - CORRECT "FORGET CHECK" ON LIBRARY TEMPLATES 

Programdump no longer prints out library templates that have never been used. 

P3047 MCP - TIGHTLY-COUPLED MAIN MEMORY "DCP" CODE 

On a B6800 multiprocessor (tightly-coupled) system, the DCP code area is allocated in the 
memory of the local processor to which the DCP is connected, rather than in global memory. 
This change reduces * GLOBAL tm Memory congestion, and reduces global memory contention when 
main memory DCP code is used instead of DCP local memory. 

Note that DCP tables are not affected: they will be in either DCP local memory or in global 
main memory on a tightly-coupled system, which is to be avoided if possible. For optimum 
system performance, it is recommended that sufficient DCP local memory be available to contain 
both DCP code and tables. 

* "GLOBAL Memory" is a trademark of Burroughs Corporation. 

P3052 MCP - "PATHRES DS" 

PATHRES can now be DSed out of the schedule queue. 

DISCSTATUS now sets the UDECIMAL bit for BX380 disk packs. 
P3063 MCP - DATA BASE EQUATION IMPLEMENTATION 

MCP support has been added for data base equation via WFL. 

P3064 MCP - "SWAPPER" HUNG VS. CONTROLCARD 

On systems with a small swapspace, SWAPPER would sometimes hang after a ZIP statement with the 
controlcard independent runner stuck in the schedule. This problem has been corrected. 

P3065 MCP - JOB FILE ROLL OUT 

When the CONTROLLER was starting a job, it was possible for it to hang on an RSVP waiting for 
disk segments. DOCTOR has been changed to issue the following error message when this occurs: 

<mix #>PK<nnn> CANNOT ALLOCATE <sssss> SEGS FOR JOB FILE ROLL OUT 
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P3066 MCP - "DMSOPEN" CONTIGUOUS SAVE MEMORY REQUIREMENT 

For large data bases, DMSOPEN could require large amounts of contiguous memory space; now, all 
large arrays are segmented and overlayable. 

P3075 MCP - PRINTER DUMP TO DRUM PRINTER 

The MCP can now take a printer dump to a drum printer. 

P3096 MCP - "NO GO PAST" PROTECTION 

All ACCESSROUTINES calls out of DMSOPEN and DMSCLOSE are now protected by NO GO PAST block to 
ensure that these DMS routines can clean up and finish their work. 

P3097 MCP - SEPARATE HALT/LOAD PACKS 

Use of separate pack families as the Halt/Load units for B6800 multiprocessor systems could 
result in a system hang. This problem has been corrected. 

P3098 MCP - "DMSUPDATEDISKHEADER NOOP" 

DMSUPDATEDISKHEADER is now a NOOP when calling for an uninitialized file. 

P3100 MCP - "RESIZE" REORGANIZATION 

RESIZEANDDEALLOCATE has been reorganized to eliminate a timing problem that could arise with 
SWAPPER with resultant BAD MOM ADDRESSF and DIALED GEORGE dumps. 

P3112 MCP - "DMSII" EXCEPTION CATEGORIES 

The DMSII exception categories FATALERROR and I NTEGR I TYERROR are now recognized. 

P3115 MCP - "FILECARDS" ATTRIBUTE " FORGETCHECK " 

A problem that caused a dump by FORGETCHECK when a program got a syntax error using the 
FILECARDS task attribute has been corrected. 

P3116 MCP - "FORGETCHECK" AFTER MEMORY EXCEEDED 

Sometimes a task running in swapspace could get a FORGETCHECK dump if it were DSed for "MEMORY 
EXCEEDED" and requested a programdump with arrays. This problem has been corrected. 

P3117 MCP - "SWAPPER," STACK STRETCH 

If a process running in swapspace were to be DSed for "MEMORY EXCEEDED" while in the process of 
having its stack stretched, the system would loop. This problem has been corrected; the system 
no longer loops . 

P3127 MCP - "TC" OVERLAY FILE CORRUPTION 

A situation in which overlayable data could be corrupted has been corrected by revising the 
mechanism for setting up overlay files. (The problem occurred only in B6800 Multiprocessor 
(TC) systems with multiple SWAPPERS, and was triggered by running CONTROLCARD as a migratory 
swaptask, as in ZIP from a swaptask.) 

One change is that a fully-dependent offspring task in the same memory subsystem as its parent 
will share the overlay file of its parent. An independent overlay file is created for a 
semi-dependent task (see MCP-GENERAL note D3252), a task in a different box from the parent, or 
a swaptask with a non-swap parent. 

P3128 MCP - COPY&COMPARE VS. REEL SWITCH 

COPY&COMPARE would get a directory compare error if reel switch occurred in two destination 
tapes at the same time. This problem has been corrected. 

P3129 MCP - "STATISTICS" 

SCR may now be run on an MCP with the compile-time option STATISTICS set and with statistics 
enabl ed. 

P3130 MCP - SCHEDULING ON "B6800" MULTIPROCESSOR SYSTEMS 

The scheduling algorithm for B6800 Multiprocessor systems has been improved to avoid a bias 
towards processor #1. 

P3131 MCP - "DL SUMLOG" 

Non-privileged users running SYSTEM/LOGANALYZER wi 1 1 now find the SYSTEM/SUMLOG when the log 
has been DLed to a family other than disk. 
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P3132 MCP - SEPARATE HALT/LOAD FAMILIES 

On a B6800 Multiprocessor system using different pack families as Halt/Load units, a dump by 
UNOWNED LIBERATE could occur if a program opened and closed the MCP code file of the follower 
processor. This no longer occurs. 

P3133 MCP - LIBRARY MAINTENANCE "IOCB" 

On B6800 Multiprocessor systems, the IOCB areas for the Library Maintenance file buffers had 
been located in local memory, causing unnecessary copying of the IOCBs to * GLOBAL tm Memory. 
This has been corrected. 

* "GLOBAL Memory" is a trademark of Burroughs Corporation. 

P3134 MCP - "INTRINSICINFO" 

Two long-standing problems involving INTRINSICINFO have been corrected. 

INTRINSICINFO is an intrinsic ARRAY in the ALGOL language; it is used by compilers to access a 
description of installation intrinsics. Because of this change, any code file compiled with 
pre-30 ALGOL wi 1 1 fault if it attempts to access INTRINSICINFO; therefore, the 29 ALGOL 
compiler can no longer be used with $SET INSTALLATION. 

One of the corrected problems involved possible dangling references after a Change Intrinsics 
operation. The other involved unnecessary extra presencebit interrupts through an absent copy 
(in the MCP) of a present descriptor (in the intrinsics). 

P3135 MCP - "CHECKPOINTED" SWAPTASK 

A swaptask may call CHECKPOINT and subsequently be RESTARTed , but will no longer be a swaptask. 
A bookkeeping error has been corrected, so such restarted tasks have their event-wait linkages 
handled properly. 

P3136 MCP - FORGOTTEN "PIB" 

Since INITIATE can now forget a PIB and return an error, callers of DOCTOR must compensate for 
the possibility of an already-forgotten PIB. 

P3138 MCP - READY QUEUE TIME 

An error has been corrected in the computation of time spent by a task in the ready queue. 

The effect of the error was to charge some tasks with ready time when they were actually 
waiting. The error was significant only in a lightly-loaded system. 

An important effect of the error was felt on B6800 Multiprocessor systems as a biasing of the 
processor selection algorithm against a lightly-loaded processor. 

P3148 MCP - MEMORY DUMPS ON A SHARED RESOURCE SYSTEM 

The TAPEDUMP procedure will no longer attempt to read the labels of tapes belonging to other 

members of a Shared Resource system, thus avoiding the erroneous rewind of in-use tapes. Also, 

the only time a tape of serial number "DUMMMP" will now be automatically used is when it is 
mounted on a drive that had been owned or acquired by the dumping system. 

P3150 MCP - "ACTIVETIME" 

A syntax error that prevented compilation of the MCP with ACTIVETIME set has been corrected. 

P3173 MCP - PRINTING OF INUSE CODE SEGMENTS 

A change to PROGRAMDUMP, which inadvertently prevented the printing of inuse code segments, has 
been corrected. 

P3179 MCP - GRAPH FOR DATA BASE USERS 

A separate graph has been added for users of data bases. 

P3196 MCP - "ZOT" LIBRARY TEMPLATE MARKER IN "BLOCKEXIT" 

An INVALID OP occurred because DISCONNECTLIB was being called with an empty descriptor. This 
case is now handled correctly. 

P3197 MCP - "IPC" SWAPJOBS VS. SUBSPACE GROWTH 

If an IPC swaptask were to increase its subspace size to a point where it would no longer fit 
in swapspace, the MCP sometimes would not DS the program for memory exceeded. This problem has 
been corrected. 
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P3203 MCP - EXTERNAL BY CALLING LIBRARY PROCEDURE 

When external procedures were processed off and then became libraries, problems would arise in 
the LIBUSEMCP. If the library were DSed, the header index node of the map was never removed. 
This has been corrected. 

P3206 MCP - MAKE "EBCDICTOWORD" INLINE 

The procedure EBCDICTOWORD is now an inline procedure. 

P3219 MCP - WORKING SETS 

Use of working sets on Mark 31 could occasionally result in corruption of the low order 20 bits 
of a word in a stack. This problem has been corrected. 

P3222 MCP - CORRECT "PBIT" OF ZERO LENGTH DOPE VECTOR 

An error has been corrected that could sometimes cause memory links to be corrupted when a 
program declared and touched a zero-length dope vector. The symptoms include a possible dump 
by BAD FORGETSPACE, if DIAGNOSTICS is set, and a control-state loop in GETSPACE. The problem 
arose when a program declared a two-dimension array with dynamic bounds, so that the upper 
bound of the first dimension was one less than the lower. (In general, the problem could occur 
with any but the last dimension of any multi-dimension array.) Because of hardware differences, 
the problem appears on B6800 but not B6700 systems. 

P3223 MCP - DEFUNCT IN "DUMPBOOTSTRAPPER" 

DUMPBOOTSTRAPPER no longer gets an INVALID INDEX when recovering from a dump on a follower 
processor on a B6800 multiprocessor system if the dump occurs after CMing from an MCP with a 
different memdumpdisk size (i.e., 31.0 to 31.1 or 30.0 to 31.1). 

P3224 MCP - ATTRIBUTE GRABBER FAULT 

The ATTRIBUTEGRABBER interface for pointer-valued FILE attributes from pre-Mark 30 compilers 
has been corrected to avoid confusion in cases that the top-of-stack item is not a pointer. 

P3227 MCP - "PAST" ORDER 

The order of entries in PAST blocks, which was inadvertently changed, has been restored to its 
original ordering. 

P3 228 MCP - RESUMED "ST" TASKS HAVE EXCESS OVERLAY GOAL 

When a task is STed, its overlay goal is arbitrarily increased while the task is suspended. 

If the task had ever had its priority or overlay goal set by the operator, this temporary high 
overlay goal would be retained when the task was resumed. Its previous overlay goal will now 
be restored properly. If the operator explicitly sets the overlay goal while the task is 
suspended, the new value will be retained. 

Also, only the first priority change by the operator would automatically adjust the task's 
default overlay goal. Now it will be adjusted for subsequent changes as well. 

P3233 MCP - "UNIT 0" 

Systems with mag tape units configured to units 1-7 would get an INVALID INDEX when a VOLUME 
ADD was done for tape volumes. This problem has been corrected. 

P3238 MCP - CARD READER ERROR RECOVERY 

Under some conditions, it was possible to cause the MCP to fault after a READ-CHECK on a 
card-reader file with a very short read. This problem no longer occurs. 

P3239 MCP - COPYING TOO MANY FILES 

Copying too many files on tape will now cause Library Maintenance to display an error message. 
Previously, Library Maintenance failed with an INVALID INDEX. 

P3240 MCP - USERCODE ON 14-LEVEL FILE NAMES 

If there are already fourteen levels in a file title, it is impossible to append a usercode to 
the title. The MCP now detects two instances of this error that were previously undetected. 

P3255 MCP - LOGGING INTERNAL FILE NAME 

IOERROR no longer fails to log the internal file name properly. 
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P3257 MCP - INCREASE MAXIMUM "BDNUMBER" 



The 3-cligit number of the <modified file name> part of a backup disk file name now goes from 
000-999 as documented. Previously, the number only went from 000-255. 

P3264 MCP - LOGGING ROW INDEX 

The row index was not logged properly for disk or pack file I/O errors. Now it is logged 
correctly for not only disk or pack files, but also backup files on disk or pack. 

P3277 MCP - TASKS SUSPENDED BY "WSSHERIFF" 

When the Working Set Sheriff was turned off (OLAYGOAL set to zero) with tasks it had suspended 
still SJTed it could take a long amount of time for them to be resumed, forcing the operator to 
OK them. This was caused by the Sheriff continuing to check for avai lable memory great er than 
AVAILMIN percent of total memory before resuming tasks. Now, when the Sherift is turned on, 
it will resume tasks it has suspended regardless of the amount of available memory. 

P3279 MCP - "BACKUPQUEUER" 

The BACKUPQUEUER function of the AUTOBACKUP module was incorrectly updating the parameter 
indicating a CONTROLLER call. This can result in the CONTROLLER hanging on train printer I/O 
or an unwanted fork of BACKUPQUEUER to fire up AUTOPRINT. This no longer occurs. 

P3280 MCP - AVOID BAD SEARCH FROM "STACKSTRETCH" 

On B6800 multiprocessor (tightly-coupled) systems, an erroneous STACKSEARCH operation was being 
performed in connection with STACKSTRETCH. The problem has been corrected. The symptom was a 
copy descriptor with a bad address. 

P3281 MCP - PROGRAMMED OPERATOR INTERRUPT 

During the revision of hardware interrupt routines, the interrupt Programmed Operator Interrupt 
was omitted, causing an INVALID INTERRUPT instead of the PROG OP. Thi s probl em has been 
corrected . 

P328 2 MCP - PASS CONTROL FILE PACK NAME TO "ACR" 

The pack name of the control file was being incorrectly passed to the ACCESSROUTINES . This no 
longer occurs. 

P3283 MCP - "AUTOPRINT" WITH FMED PRINTER 

When AUTOPRINT was directed to a particular printer by the operator input "FM LP <?»>"■ « f '« 
the file requiring the FM has been printed, any immediately following files which did not 
require the special forms would be printed on that printer also. 

This problem has been corrected; now, the FMed printer will be saved as soon as the first file 
has been printed. 

A side effect of this change is that if any printer in use by AUTOPRINT is saved, AUTOPRINT 
will release it as soon as the current file has been printed. 

P3301 MCP - EXCESS WORKING SET SHERIFF OVERHEAD 

On a B6800 multiprocessor (tightly-coupled) system, the Working Set Sheriff was attempting to 
overlay the MCP stack's overlay amount of memory in every box, rather than only in the global 
box where the MCP stack is located. This caused the Sheriffs running in the other boxes to 
look at many more memory links than necessary, trying to overlay this amount of memory Ihe 
problem has been corrected. Now, only the Sheriff running in the global box will look tor 
memory belonging to the MCP stack. 

P3319 MCP - "INV OP" IN ATTRIBUTE HANDLER 

With a data base stack larger than 8K words, the procedure SIRWOFADDRESS would return bad 
results. This would cause an INV-OP in attribute handler. 

P33 21 MCP - BOUNCE DUMP 

Except at Halt/Load time, BAD DIR MEMDUMP's will now be PROGRAMDUMP ' s 
P3335 MCP - HANDLE NULL SUBSYSTEM IN UNRAVEL 

Unravel will not cause a "FAULT ON BAD TASK ATTRIBUTE" if the SUBSYSTEM attribute is null. 
P3336 MCP - FAULT BECAUSE OF MISSING INTRINSIC 

Attempting to use a missing installation intrinsic will no longer cause a fault in the MCP 
procedure LOSEOLAYSPACE . 
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P3338 MCP - ANALYZE LIBRARY TEMPLATE 



Prints out key information stored in the library template when taking a program dump with the 
option ARRAYS set . 

P3339 MCP - "TAPESEARCH" 

When copying from tape with files in order: 
A/B, X/Y, A/C, X/Z 

using "COPY A/=, X/=, ..." 

TAPESEARCH would get fault. This problem has been corrected. 

P33 5 5 MCP - PROGRAM MARKED AS SWAP JOB 

If a codefile had SUBSPACES=0 specified as a compile-time attribute specification and it was 
initiated with a task variable which previously had TSK. SUBS PACES : = 2 (this will happen for a 
CANDE task if the CANDE option SWAPALL is not set), it would cause the system to go into a lock 
loop only if SWAPPER were not running. This problem has been corrected. 

P3356 MCP - "QT PB MT" 

When a tapeparity error occurs while AUTOBACKUP is printing a PB tape, AUTOBACKUP will now 
print a "QTED" ending banner. 

P3358 MCP - "LOADALABEL" VS "MULTIFILE- 
PARITY on POSITIONING open error for multifile OCR tapes has been corrected. 

P3 3 75 MCP - "GETSTATUS FORGETCHECK" 
Programs calling GETSTATUS to get an MCS number will no longer cause dumps by FORGETCHECK. 

P3376 MCP - "LOADCONTROL" TO TAPE 

LOADCONTROL to tape will no longer cause dumps by "ILLEGAL I/O" on a B6800 multiprocessor 
system. 

P3448 MCP - CHECKPOINT/RESTART FOR PROGRAMS USING STRINGS 

The string pool of a program is now saved in the CP file and correctly restored. 

P3449 MCP - RESTART OF SERIAL DISK FILES NEAR "EOF" 

Restart will now compute correctly the last row for serial disk files restarted near the EOF. 
Previously, the restart would abort. 

P3450 MCP - RERUN OF "COBOL" FILES WITH USE ROUTINES 

Rerun of a COBOL program with use routines for a not-opened file now works properly. An SIRW 
unchanged by RESTORER, with unpredictable results, has been corrected. 

P3451 MCP - MULTIPLE WAIT 

A program that waits on time and an element of a large, untouched event array will no longer 
hang the system when run in a heavy mix. 

P3452 MCP - "STACKLIMIT" TASK ATTRIBUTE 

The STACKLIMIT attribute may no longer exceed the value of 65000. 
P3453 MCP - CORRECT TIME SLICE CALCULATION 

Time slices for interactive tasks are now properly calculated. 
P3454 MCP - ALLOW HALT/LOAD AFTER POWER UP 

The MCP will now Halt/Load after a power up. 

P3455 MCP - "BOUNCE" MESSAGE 

BOUNCE wi 1 1 now issue FLATREADER error messages more often. Previously, at most four messages 
were issued; now, up to five messages per row are allowed. Previously, a message was issued 
only if all backup copies failed; now, a message will be issued for every failure, even if the 
failure is subsequently corrected by reading from a backup directory. 
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P3456 MCP - " SYSTEMSTATUS " VS. "UNITMOVER" 

After a pack has been moved, SYSTEMSTATUS now properly locates the unit. 
P345 7 MCP - CALCULATION OF CODE CORE ESTIMATE 

The MCP now correctly calculates the estimated core requirements of a new task. 
P345 8 MCP - "FA" SWAP JOB 

Sometimes a swapjob would issue a "NO FILE" RSVP after a "REQUIRES PACK" RSVP and not respond 
to the reply "FA". This problem has been corrected. 

P3461 MCP - CHECKPOINT OF LARGE SIZE STACKS 

Checkpoint will now verify that the stack can be written in a row of the CP fil e . I f the si tack 
is too large, the checkpoint will be aborted with message #30: "ROW SIZE OF CP FILE TOO SMALL . 

The row size for CP files is now 1008 segments, thus allowing the restart of stacks of less 
than 22600 words . 

P347 8 MCP - IMPROVE RUN TIME PARAMETER CHECKING 

Run-time parameter checking failed to catch mismatches in the parameters of procedures which 
are themselves formal parameters. This allowed "external" procedures to be invoked with 
totally unacceptable parameter types. 

Now, procedure parameters will have their own parameters fully checked. 
P3479 MCP - MULTIPLE FLAGREADERS 

The MCP no longer gets a dump by "BAD DIR RECORDS" when closing several packs at once. 
P3480 MCP - HALT/LOAD MEMORY CONFIGURATION 

The minimum configuration to halt/load the MCP is 5 "mods" of memory (where a "mod" is 16384 
words). Mods and 1 must be present, plus any three others. 

The Mark 31.242 MCP would not halt/load without mods 0-3 available; the Mark 31.280 MCP would 
not halt/load without mods 0-4 available. These restrictions were unintentional; the errors 
have been corrected. 

P3482 MCP - DYNAMIC "EBIT" 

The EBIT of the MSCW on future machines may be moved to bit 18. A variable will tell where the 
EBIT is. GETITGOING has its own EBIT variable also. 

P3496 MCP - "LOCKTRACE" OPTION 

The MCP diagnostic option LOCKTRACE (Option 30) now works correctly. 

P3519 MCP - REPORT ON EXCLUSIVE FILES 

FILEDATA and "PD" entered from the ODT did not report the existence of files which were in use 
Exclusive; thus, large files could be effectively hidden, and if the file were IAD, it might be 
assumed that the space were available and could be relocated. This no longer occurs. 

P3521 MCP - "REELSWITCH" VS. DENSITY 

OUTPUT REELSWITCH will now request the same density as the previous reel. 

P3 522 MCP - STACKS WAP VS. STACKSTRETCHER 

CANDE was taking dumps by "BAD PBIT" because CANDE worker stacks were being s tacks t re tched and 
copy descriptors were not being updated. This no longer occurs. 

P3 5 23 MCP - DESTNAME ON "ACR" CODEFILES 

Setting Destname on an ACR codefile will no longer hang the system. 

P3 524 MCP - RESERVEDISK AND USERDATA HEADER 

Reservedisk will no longer occasionally cause the header for the userdatafile to be removed 
from memory. 

P3 527 MCP - DATA BASE "TITLE" ATTRIBUTE VERIFIED 

DMSATTRIBUTEHANDLER now verifies that data base names assigned to the data base TITLE attribute 
are syntactically valid. In addition, if the data base name does not include an ON 
<familyname> specification, ON DISK is added to the name. 
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P3 52 8 MCP - UNITS EQUAL CHARACTER VS. BACKUP 

Backup files were being created with the units field of the tape header set to characters 
instead of words, causing only 300 characters of each block to be read instead of 300 words. 
This no longer occurs. 

P3 529 MCP - PASSWORD HANDLING 

An error has been corrected in password handling. The most common symptom was a SECURITY 
VIOLATION resulting from an assignment like the following, where P specified the same usercode 
that the task was already using: 

REPLACE MYSELF. USERCODE BY P 

It would also fail in a direct call of USERDATA function 6, under some circumstances. 

P3530 MCP - "CONTROLCARD(QUEUE,7)" 

An error has been corrected so that the DCALGOL construct CONTROLCARD(Q, 7) will no longer 
produce an INACTIVE QUEUE fault when the queue is proper. 

P35 31 MCP - STACK OVERFLOW HANDLING 

Programs that get a s tackover f low in the format intrinsics while handling a fault in the 
intrinsic will no longer cause the stack to be corrupted with a misplaced RCW. In addition, 
these programs will get R-DSed if their stacklimit is exceeded. 

P3568 MCP - PROGRAMS USING MARK "31" PORTS AND SIGNALS 

Programs using the Mark 31 version of Ports and Signals are no longer supported. The HOSTINFO 
function has also been de impl ement ed . Programs using these features are now terminated. 

P3569 MCP - CLOSE PORT VALUES 

Errors reported by the port procedures from close of the fibstack are now reported to the user. 

P3570 MCP - "AVAILABLE" TYPE OF FILE OPEN 

AVAILABLE (and RESIDENT) types of file opens now work properly if NEWFILE=FALSE or both NEWFILE 
was not set and AREASIZE=0, and in either case, if the explicit or computed MYUSE=OUT. For 
example, an AVAILABLE open with NEWF I LE-FALSE , MYUSE=OUT will not wait on an exclusive file 
(MYUSE could be set to OUT if the file were previously implicitly opened with a WRITE 
s tat ement ) . 

P3 5 75 MCP - FORGETCHECK AFTER PROGRAMDUMP 

A forgetcheck no longer occurs when taking a programdump while closing a data base. 

P3576 MCP - "INVALID OP" IN "DMSCAUSE" 

A stack doing a DMS WAIT with the MAXWAIT option specified no longer causes an INVALID OP in 
the stack doing the corresponding DMSCAUSE. 

P3577 MCP - "SWAPPER" VS. "SIB" 

SWAPPER now properly relocates a SIB if one of the MSCWs in the SIB falls on a pseudo-stack 
boundary . 

P3578 MCP - SOFTWARE INTERRUPT HANDLING 

Stacks that have been erroneously marked as STed will no longer hang the system if they use 
software interrupts. 

P3579 MCP - "JOBDESC" VS. NONEXCHANGED UNITS 

A JOBDESC file on a non-exchanged unit no longer causes a dump by ILLEGAL I/O. 
P3585 MCP - "NOT READY" MESSAGES 

UNIT NOT READY messages will now be printed in the job log. 
P3607 MCP - TAPE VERIFY 

When doing a tape verify, the heading line with the MCP level will now be printed correctly, 
and the system serial umber will be printed with 4 digits. 

Also, a problem using "VIA MPX <n>" on a B6800 Multiprocessor system has been corrected. 
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P3609 MCP - CHECKPOINT RESTART WITH ARRAY PARAMETER 

The rerun of a checkpoint ed task that was passed an array parameter will mo longer abort with 
an instruction timeout when going to EOT. l[n addition, entering "<mix #> OT" will now work 
correctly on the restarted task. 

P3610 MCP - VOLUME LIBRARY 

A recently-introduced problem in the volume library has been corrected. Continuation entries 
in the volume library no longer leads to VAST and VOLLIB errors and rebuilds. 

P3 620 MCP - LIBRARY MAINTENACE TAPE ERRORS 

The following problems have been corrected: 

1. If the reel "switch directory" needed for copying to tape cannot be allocated (or an error 
occurs using it), Library Maintenance will terminate with an error message. 

2. Certain "CLOSE errors" will now cause Library Maintenance to FR the affected destination 
tape; i.e., FR (Final Reel) stops output to the given destination. 

P3621 MCP - PATHS, "FREE, DISKSTATUS" PROBLEMS 

The following problems have been corrected: 

1. A problem in DISKSTATUS caused by a "first action" result descriptor. 

2. On a B6800 Multiprocessor system, FREE and ACQUIRE conflict with MOVEd packs. 

3. A "MISSING MPX" problem on a B6800 Multiprocessor system. 

P3631 MCP - NEW FINE PRIORITY ALGORITHM 

The fine priority is calculated as the sum of two terms (the higher the number, the lower the 
priori ty) : 

1. The age of the task: a number ranging from 0--4 based on the amount of processor time a task 
has used since it was started. The current calculation is: 

PRIORITY ACCUMULATED PROCESSOR TIME (SECS) 

0- 3.99999 

1 4- 15.99999 

2 16- 63.99999 

3 64- 255.99999 

4 256- 999999999 

2. The recent activity of the task: a number ranging from 0-3 based on the amount of processor 
time used since the last resurrect for this task. 

PRIORITY ACCUMULATED PROCESSOR TIME (MILLS) 

0- 7.9999 

1 8- 127.9999 

2 128- 2047.9999 

3 2048- 999999999 

P3632 MCP - MESSAGES 

The following two messages were accidentally concatenated into one message used for two 
purposes : 

"WFL JOB FILE IS INCOMPATIBLE WITH THIS MCP, UNABLE TO RESTART" 

and 

"DEALLOCATING ACTIVE TASK VARIABLE" 

The messages have now been separated. 

P3647 MCP - RESOURCE WAIT 

The calculation to determine the number of tapes available for resource allocation was 
returning too small a number. This problem has been corrected. 

P3648 MCP - "DESTNAME" ATTRIBUTE 

Jobs that use the DESTNAME attribute will no longer occasionally hang at EOJ time waiting 
forever on DESCUNLOCK. 

P3649 MCP - "ODT" QUEUE 

The following problems have been corrected: 



1. The 

er 



e console ODT occasionally got hung in XMIT. This could occur if a WRITE request with an 
ror (timeout) were ahead of a READ request. The READ is now moved ahead of the write. 
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2. The ODT hanging in XMIT also could be caused by a hardware problem. If an operator XMITs a 
request between the time that a WRITE to the ODT is started and the "write timeout" error 
condition, the ODT would not issue a status change for the operator's request to be read. 

Ex amp 1 e : 

a. An ADM page is being transmitted to the ODT. 

b. Before the page is complete, the ODT is put in local. 

c. A request is transmitted; the ODT is hung. 

If, at step "c", the operator waits a couple of seconds (to allow the WRITE to timeout), 
the ODT will not hang. 

3. The Mark 32 queue-driven keyin implementation has been removed and replaced by the Mark 31 
(and earlier) forking of keyin. 

P3650 MCP - "DS" PERMANENT LIBRARY 

Libraries which were processed out of a user routine and froze permanent were not being DSed if 
the parent stack did the DS (using LIBTASK. STATUS : TERMINATED) . This caused a "SHAREDYBALL 
LIBRARY ALREADY INITIATED" message to be generated when the user attempted to process off the 
library again. This problem has been corrected. 

P3 651 MCP - EXPAND MAX TASK PARAMETERS 

On the Mark 31 PR1 release, the maximum number of words which could be passed as parameters was 
128. That number has been increased to 256; the error message has been changed accordingly. 

P3652 MCP - "WFL" SUBROUTINES 

WFL subroutines that have been processed by the jobstack will now work as they did on the Mark 
31 release when using task variables declared in the jobstack. 

P3653 MCP - "FS" AND "DS ODT" INPUTS 

The FS (XS) and DS ODT commands will now work more reliably when used after an HS (EI) ODT 
command has been entered. 

P3654 MCP - READ HEADER REORGANIZATION 

The DCALGOL READ DISKHEADER command would not work if the file title passed as a parameter were 
of the form "<file> ON <packname>." This problem has been corrected. 

P3685 MCP - "UR-" 

UR- (or UA) of a disk or tape path that is not reserved will no longer cause a "PATH MARKED 
OFFLINE" error message. 

P3686 MCP - "INVALID OP" IN PRESENCE BIT 

If an installation intrinsic initiated an internal process, when that process went to EOJ the 
MCP would improperly destroy the code file header for the intrinsics stack. This would cause 
the MCP procedure PRESENCEBIT to get a fault on the next P-bit of an intrinsics segment. This 
no longer occurs. 

P3687 MCP - "BDNAME" "SEG ARRAY" FAULT 

A problem has been corrected where setting BDNAME to a non-usercoded value of 2 or less 
characters caused a dump. 

P3688 MCP - AUTOPRINT "AX" COMMAND 

The AX command to Autoprint now works correctly for the printing of backup tapes. 

P3710 MCP - "DMSCLOSE" VS. "CONTROLLER" 

When a data base stack went away, the CONTROLLER was not notified of the current in-use count 
of the data base . 

This would cause the CONTROLLER to fail to release the data base stack number after the data 
base had gone to EOJ. The next task using that stack number would appear in the active entry 
list, but with the name of the old data base. 

This problem has been corrected. 

P3746 MCP - SCRATCH TAPE WITHOUT WRITE RING 

A scratch tape without a write ring will now be treated as an unlabeled tape. 
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P3748 MCP - "DUP FILE" MESSAGE 
The following RSVP message will now display the CR mnemonic when the job contains a WFL data 
deck that is causing a duplicate file condition: 

<filename> DUP FILE ON: . . . 
P3781 MCP - "TAPEDUMP," REPORT BLOCK, REWRITE COUNT 
The "progress report" which TAPEDUMP writes on the ODT now includes the count of tape blocks 
written Sid the number of blocks rewritten because of error, if any. 

Examples of Output : 

ADDR=78000, PROC 2 BLOCKS WRITTEN: 137, REWRITTEN: 2 

ADDR=COOOO BLOCKS WRITTEN: 29 
Because the write-error —very mechanism in TAPEDUMP is to serially number each bio. k « d 
simply rewrite any erroneous b ock wi thout ba ck, pac ing or eras ng occurrence, 

bad tape or drive by me re 1 y wa t ching ^he t.pe. A ^ew rewr. en d ^^ ^ CLEAR 

£S rested e^Lwner^^Tn^RE^TT^N^ounr.s'incremented once for each retry, whether of 
the same or different dump blocks. 
The progress report is now written every 8000 (hex) words, rather than every 4000. 

P37 82 MCP - RESIZE OVERLAYABLE ARRAYS IN GLOBAL 
A. oca. memory task resizing an overlayable array belonging to a stack in global memory no 
longer causes an occasional dump by BAD MOM ADDRESS. 

P3784 MCP - AVOID HUNG PRINTERS 

Some internal MCP logic dealing with no-path s i tua, i ons J"^",."^ hung . "'^e ' problem 

^been'ob^^^ 
P3787 MCP - "GUARDFILE" VS. "CANDE" 

CANDE no longer hangs waiting for missing guardfiles. 
P3801 MCP - CORRUPTION OF "LIBUSEMAP" 

Entries are no longer left in LIBUSEMAP which could cause users to hang waiting on libraries. 

P3802 MCP - "FIB" CREATION LOCKING 
A small window has been closed, so that ApRIBUTEHANDLER will not fault when setting up a FIB 
in some other stack which is being stretched. 

P3817 MCP - ERRONEOUS "DS" WHEN "DBS" INITIATION FAILS 

corrected. 

P3822 MCP - "EXCEPTIONTASK" VISIBILITY 
Under some circumstances in a Tightly-Coupled or Swapper environment, it i s not always P^sible 
Vo^causr the EXCEPTIONTASK. EXCEPTIONEVENT of a „ ow \ JJ' '^^'^eveT ^th"' tr.an 
tak-eTdimp oVItte J"? a. lure'act \^"t he^e "fuS' d! f n^y'wnen! at by default, EXCEPTIONTASK 
is the parent (critical-block) task. 

P3 824 MCP - MEMORY ORGANIZATION, LOCAL MCP" CODE 

tj, ............ .- rB •;; 4 i",;"'i^ i :::!i::, 1 ;„ , ;:. ,, s? .;."...:" tV.'"^i',',. c ',':\% 

memory accesses to S GLOBAL tm Memory, and a corresponding increase in throughput. 
* "GLOBAL Memory" is a trademark of Burroughs Corporation. 

iT.:.r-s -.i^r'K:/".";"- sr-t'-sa a zfisw.'S.i-si i:. i;\.'i«5..-s. ?: 

monolithic systems remains at 2100. 

These changes cons t i tut e a ma J or s t ep i n the elimination of ^segment 1" and ^"J^n^S 

details. 
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Some of the SYSTEST DCP tests depend upon a data descriptor to "seg 5" in absolute location 
zero This mechanism was broken in the Mark 31 release. It has now been restored, but the 
!£ Ca S££ Cr,bed ,S local M S!l save code rath « r than segment 5. On a B6800 multiprocessor system, 
the DCP accesses the MCP save code in the local memory of the processor to which the DCP is 
connected . 

P3 825 MCP - PARITY ON PRESENCEBIT STACKOVERFLOW 

A problem that could cause a fatal s t ackoverf low in some par i t y-on-presencebi t situations has 
been corrected. 
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DOCUMENT CHANGES NOTES (D NOTES) 
MESSAGE LEVEL INTERFACE PORT 

D3142 MLIP - INITIALIZATION ROUTINES FOR "B6900" 

The initialization routines of the MCP have been extensively modified to allow for the 
initialization of B6900 systems using the new IO subsystem hardware. 

The B6900 is initialized by means of a permanently resident boot strap s i tuated at locat i°" "™ 
in memory! "n order to accommodate this, the layout of that portion of memory below the DO 
stack has been changed. 

The procedure GETITGOING has been extended such that it i s now responsible for *|}« »■»» «»» 

i°'? I ». of the low end of memory, and is also responsible for selecting and read ng in the 

e segments'™ c^de^endUg on the type of system. The READIT ca 1 1 s previously m 

SECONDARYINITIALIZE are thus subsumed into the extended GETITGOING procedure. 

New hardware operations exist on MLIP systems to read the time-of-day clock, and to keep the 
running ligh? on. The defines invoking these functions have been modified to execute the 
appropriate operators, depending on the type of system. 

See GENERAL note D2303, "B6900 Overview", for a description of the B6900 system. 
D3355 MLIP - LOG "MLIP I/O" ERRORS 
The LOGANALYZER now analyzes MLIP I/O error records (MAJOR TYPE 2, MINOR TYPE 16) in the log. 
The MCP will log up to 500 retries per I/O error. 
The SOG Reference Manual, Volume 2 Page 6-1-25, should be changed as follows: 

In Table 1 under MAJOR TYPE 2, add the new MINOR TYPE 16 "MLIP I/O Error Record". 

Teco^^^^mTnor^lypnf'lI 8 'Hi Y^l^ X a MLIP terror recjrd'and V %?%» 
counterpart to the MPX I/Terror record which has a minor type of 10. The first four words of 
the MLIP I/O erroV record contain the standard information found in any log record. The rest 
of the MLIP log record is different from the MPX log record. 

WORD 4 * 

[47:8]: MLIP LOG TYPE specifies the type of MLIP log record. 

= 1 indicates this is an error-recovery log record. 

= 2 indicates this is an error-IOCB log record. 

The rest of this note specifies the format for an MLIP I/O error-recovery log record. 

The next three words of the log record contain control information about the structure of the 
record and contain unit information. 

WORD 4 ' 

[39:8]: MLIP LOG VARIANT specifies the subtype of the MLIP log 
record. 

= 1 indicates the log record is for normal error recovery 
and all information for a retry is present. 

= 2 indicates the log record is for limited error 

recovery and some of the information for each retry 

is not present. The RETRY DLP COMMAND and the RETRY 
MLIP CONTROL are not present. 

[27:12]: NUMBER OF RETRIES which were logged. 

[15:1]: IRRECOVERED. 

= indicates the I/O recovered. 

= 1 indicates the I/O was irrecoverable. 

WORD 5 * 

[47:112]: LOGICAL UNIT NUMBER. 

[35:12]: PHYSICAL UNIT NUMBER. 

[23:6]: LOGICAL UNIT TYPE. 

[17:6] : UNIT SUBTYPE. 

[11:12]: PHYSICAL UNIT TYPE. 

B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 MESSAGE LEVEL INTERFACE P 



B6000 SERIES MARK 32 



PAGE 376 



WORD 6: 

(47:4] 



[11:12]: 



NUMBER OF FILE AND JOB INFO ITEMS is the number of items 
of file information and job information logged. File 
information includes the file title, the internal 
name, and the serial number. Job information is the 
job name. 

FILE AND JOB INFO LOCATION is the number of the word in 
the log where the file and job information starts. 



The next eighteen words of the log record contain information about the original I/O. 

WORD 7: 

[19:20]: MLIP CONTROL. 



WORD 8: 

WORD 9: 

WORD 10: 
WORD 1 1 : 

WORD 12: 

WORD 13: 



DLP ADDRESS. 

MLIP STATE AND RESULT. 
I/O START TIME. 
I/O FINISH TIME. 



WORD 14: 

[45:10]: STACK NUMBER OF IOCB OWNER. 

[33:10]: STACK NUMBER OF 10 INITIATOR. 

WORD 15: I/O CONTROL WORD. 
WORD 16: 

[47:20]: MEMORY ADDRESS OF START OF AREA. 

[27:20]: LENGTH OF AREA. 



WORD 17 
WORD 18 
WORD 19 
WORD 20 



LOGICAL RESULT DESCRIPTOR. 
DLP COMMAND. 
DLP RESULT (WORD 1 ) . 
DLP RESULT (WORD 2). 



The next thirteen words are the extended result descriptor and the results of reading the 
extended result descriptor. 

WORD 21 - WORD 33: EXTENDED RESULT DESCRIPTOR AREA. 

The next two words contain I/O statistics. 

WORD 34: [47:24] Total since H/L of read I/Os to this unit 
[23:24] Total since H/L of write I/Os to this unit 

WORD 35: [47:24] Total since H/L of read errors logged for this unit 
[23:24] Total since H/L of write errors logged for this unit 

The next section contains retry entries of five words each. The NUMBER OF RETRIES (WORD 4) 
which were logged is variable, so this section is of variable length. The format of each entry 
is as f ol lows : 
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ENTRY WORD 0: RETRY DLP COMMAND. (Not present if LOG VARIANT 

is 2.) 

ENTRY WORD 1 : RETRY DLP RESULT (WORD 1 ) 

ENTRY WORD 2: RETRY DLP RESULT (WORD 2). 

ENTRY WORD 3 : 

[47:1]: ACTUAL RETRY. 

= if entry is not an actual attempt to retry 
the I/O (e.g. repositioning a tape). 

= 1 if entry is an actual attempt to retry the 
I/O. 

119-201: RETRY MLIPCONTROL. (Not present if LOG VARIANT 
is 2.) 

ENTRY WORD 4: RETRY MLIP STATE AND RESULT. 



The last section contains file and job information Since the length of the previous section 
v.riis the startine word of this section is also variable and is the value of FILE AND JOB 
INFO LOCATION ,n "hi con™oT section (WORD 6). The NUMBER OF FILE AND JOB INFO ITEMS (WORD 6) 
is variable as well as the length of each item, so this section is of variable length. The 
format of each item is identical to the file and job info items of the MPX I/O error log 
records. The first word of each item specifies the type and length of the item: 

ITEM WORD 0: . . ... ^ 

[39:20]: LENGTH OF ITEM (including this word). 

[19:20] : TYPE OF ITEM. 

= 1 indicates item is SERIAL NUMBER info. 

= 2 indicates item is FILE TITLE info. 

= 3 indicates item is JOB NAME info. 

= 7 indicates item is INTERNAL NAME info. 

If the type of item is SERIAL NUMBER information, the rest of the item's layout is as 
f ol lows : 



ITEM WORD 1 
ITEM WORD 2 
ITEM WORD 3 



LEBCONTROL. 
GENEALOGY 1 . 
GENEALOGY2 . 



If the unit is a pack, magtape, or diskette, the SERIAL NUMBER item contains a fifth 
word : 

ITEM WORD 4: SERIAL NUMBER in EBCDIC characters. 

If the type of item is FILE TITLE information, the rest of the item's layout is as follows: 

ITEM WORD 1: ROW INDEX of the file on pack or disk. This word 

will be all ones if there is no valid row 
index or unit is not a pack or disk. 

If the length of the FILE TITLE item is greater than two, the rest of the item is the file 
title in s t andardform. 

If the type of item is JOB NAME information, the rest of the item is the job name in 
s t andardform. 

If the type of item is INTERNAL NAME information, the rest of the item is the internal name 
in s t andardform. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
MESSAGE LEVEL INTERFACE PORT 



P2763 MLIP - IMPLEMENT "PRINTERDUMP" 



The MCP routine MEMDUMP, used for direct memory dumps to the printer, has been modified to work 
on the B6900. 

Since this portion of the MCP symbolic may be extracted and compiled as a stand-alone program, 
it contains all necessary declarations and code to determine the type of system on which it is 
running, and to execute accordingly. An indication of the type of system is printed as part of 
the heading. 

Other than the above, there are no functional changes to the routine. 

P2764 MLIP - "PRINTIOCB" INTERFACE ANALYZES "IOCB" 

Instead of invoking its own PRINTIOCB procedure to print the IOCB, PROGRAMDUMP now invokes a 
new PHYSICALIO interface called PRINTIOCB. PRINTIOCB has two parameters: the IOCB and a 
"print" procedure (which accepts an array as a parameter). PROGRAMDUMP passes as the procedure 
parameter a new local procedure called PRINTLINE. The PRINTIOCB interface calls PRINTLINE 
after building a new line it wants printed. 
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DOCUMENT CHANGES NOTES (D NOTES) 
NETWORK DEFINITION LANGUAGE 



D302 8 NDL - MESSAGE-ORIENTED DATACOM 

The canabilities of Message-Oriented Data Comm have been extended by the development of the 
ISf„?»? r Model III (AC III). This software release supports the use of the BDLC 

plot^ol on th^AC IH ano is to be used in conjunction with Burroughs Network Arch.tecture 
(BNA) . 

A complete description of the changes to NDL as a result of this "ew impl emenl jation may be 
found in the Message-Oriented Data Communications Reference Manual, Form No. 5011836. 

D3204 NDL - CHANGES FOR "DCP" CHARACTER ORIENTED DATA COMM 

The following NDL compiler and NDL Reference Manual changes are relevant to DCP 
Iharacte?-oriented da?a comm (i.e. non-message-oriented, non-B6900 data comm): 

In the NDL Reference Manual, the Control Defini t ion INITIALIZE statement (page 
5-28) has been revised to delete the INITIALIZE SEQUENCE opt. on. 

The syntax diagram should read as follows: 

INITIALIZE BCC 

CRC 

RETRY - 

b In the NDL Reference Manual, the description for the Request Definition TERMINATE 
statement has been revised to delete the last paragraph on page 5-141. 

c The following station characters have been added as read-only byte variables: END, 
BACKSPACE CONTROL, LINEDELETE, WRU. These variables can be .nterrogated in 
Control definitions, Transmit requests, and Receive requests. 

d The Request Definition INITIALIZE statement allows two new options: TOGS and 

ERRORFLAGS . 
e. The Request Definition STORE statement has been expanded to allow STORE TOGS. 

* NOTE- In order to provide one consistent syntax diagram for each NDL statement 

changed thl. release, these features are described, along with the features added for 

message-oriented data comm, in the Message-Oriented Data Communications Reference 
Manual, Form No. 5011836. 

D3385 NDL - DIFFERENT TERMINAL ADDRESSES 

£~S; w' 2:,KiM;: :£?«•;.!::; .?" sk «=«.:!; at.i'ts-ius *::&. a "■ 
cr:i:S£:*:»-JK5-i.Jrs:?:'='ts. , f.iS !J:-as*HUrt: su:::i.*tt.s::--;.—*— - 

Since whenever the addresses are identical, NDL makes the receive and transmit addresses be 
identical it is possible now to always generate the code as if the addresses were different. 
Such code will work in either case, so that change has now been made. 

D3527 NDL - TRANSMIT/RECEIVE DELAYS 

The NDL manual is misleading in its 

While these quantities are calculated ror eacn sianu.. as «<=**...,— ■■■ —■- - — ---- fiie "line 

(Form No 5001522), the DCP actually stores and uses only one value for each line. The ine 
value is determined by maximizing the station delays for all stations assigned to the line. 
The discussion oTthl INITIATE TRANSMIT and INITIATE RECEIVE statements on Pages 5-20 5-30 
5-120 and 5-121 and the discussion of the RECEIVE statement on Page 5-34 and 5-124 should be 
read with this fact in mind. 
D3543 NDL - " <LINE DEFINITION)" STATEMENTS 

cannot be part of a default <line definition>: 

<line address statement) 

<line answer statement) 

<line commandblock statement) 

<line endofnumber statement) 

<line station statement) 

<line type statement) 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
NETWORK DEFINITION LANGUAGE 



P2714 NDL - PAGE BETWEEN "VOIDT" AND "POP VOIDT" 

The NDL compiler would ignore any {PAGE cards in the card file which appeared within the range 
of SVOIDT and SPOP VOIDT pair. This problem has been corrected. 

P2804 NDL - -ENTER" 

The NDL compiler would get an INVALID INDEX if a label were used but not found, if the label 
usage occurred on an internal table boundary. This problem has been corrected. 

P3256 NDL - INHIBIT SYNC EDIT WRONG 

In a reorganization of NDL during 30 PR1 , an error was accidentally introduced into the cluster 
type field generation for synchronous lines. As a result, the terminal INHIBITSYNC 



( SYNCS )=TRUE/FALSE attribute was being incorrectly applied, and the type field generated might 
or might not have the proper setting for editing or not editing sync characters. This problem 



P3599 NDL - ENLARGE "UNFO" ARRAY 

The compiler could get an INVALID INDEX fault when compiling a network containing more than 
1300 stations. This problem has been corrected by increasing the size of an internal table. 

P3604 NDL - " SNETWORK" OPTION 

In NDL, the compile-time option SNETWORK, which prints a network summary showing the datacom 
network, can now be used safely when more than 26 stations are defined on a line. 

P3605 NDL - CLEAR LINETABLE ARRAY 

Currently, if MAXSTATIONS is defined on a line which has less than maxstations stations an 
INVALID INDEX may result if the $SET NETWORK option is used. This problem has been corrected. 

P3751 NDL - CALL "BRANCHLINK" 

Several Message-Oriented Datacom constructs were unable to correctly optimize GOTO chains. 
This problem has been corrected. 
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DOCUMENT CHANGES NOTES (D NOTES) 



NDLII 



D3397 NDLII - "NDLII" IMPLEMENTATION 

A new Network Definition Language, NDLII, is available for use with 
Subsystem NDLII is a procedural language which allows flexible use 
system. NDLII is not compatible with B6700/B6800 datacom systems; 
be used on these systems. 



the 



the B6900 Data Comm 

of the B6900 data comm 

current NDL wi 1 1 still 



NDLII is 
the Mark 



described in 
32 release. 



the file NDLII /DOCUMENT contained on the SYSTEMNOTES tape included with 
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DOCUMENT CHANGES NOTES (D NOTES) 



NEWP 



D2973 NEWP - "AT <LIBRARY ID>" ALLOWED 

A library identifier is now allowed as the <location designator) part in the "<type> AT 
.(location designator)" syntax. 

D2974 NEWP - "INITIALIZATION" IS RESERVED WORD 

"INITIALIZATION" is now a reserved word; it cannot be used as an identifier. 

D3031 NEWP - CONDITIONAL OPERATORS 

The NEWP language now has binary infix <cond i t i ona 1-opera tor>s which are used to combine 
<boolean-primary>s in boolean expressions in the same way that <logi cal-operator>s are used. 

The <condi t i ona 1-opera tor> s are similar to the < 1 og i ca 1 -ope ra tor>s , except that the right-hand 
operand is not evaluated if the value of the left-hand operand is sufficient to determine the 
value of the operation. 

Syntax : 

.^conditional operator) 

CAND 1 

COR - 

CIMP 



Ope rands 
I. R 


Operat ions 
L CAND R 


L COR R 


L CIMP R 


TRUE boo 1 
FALSE bool 


boot 
FALSE 


TRUE 
boo 1 


bool 
TRUE 



The <condi t i ona 1 -ope ra t or > 'CAND' has the same precedence as the < 1 og i ca 1-opera tor> 'AND' 
'COR' the same precedence as 'OR', and 'CIMP' the same precedence as 'IMP'. 



P' 
EXAMPLES : 



B 
B 
B 



= Rl NEQ CAND R2/R1 EQL R3 ; 

= Rl GEQ AND Rl LSS SIZE(A) COR R2 NEQ A[R11- 

= Rl GTR CIMP A[R1-1] = Rl ; 



D3032 NEWP - IMPLEMENT CONTROL STATE BLOCKS 

££?™£j «,£*££* blocks are now available in the NEWP language. The "unsafe" block directions 
CONTROLSTATE and NORMALSTATE are now allowed following any BEGIN, specifying that the compound 
statement is to be a block which is run in control state or normal state, respectively. This 
concept allows the static specification of normal state versus control state in a NEWP program 
Iin«TJ he M< T P P re y iou s'y. NEWP programs used the DISALLOW and ALLOW statements (inherited from 
ESFOL) to dynamically alter the "control" state of the processor. ALLOW and DISALLOW have been 
de-impl ement ed as NEWP language constructs. 

In the absence of any explicit compiler direction, the "state" of a block (and the body of an 
ON declaration) is inherited from the containing block; the outer block and all procedures are 
by default normal state. (The Mark 31 NEWP compiler caused procedures without these explicit 
state directions to inherit the state from their containing environment and caused all ON 
declarations to be normal state.) 

The explicit use of CONTROLSTATE or NORMALSTATE block directions creates a true block- in 
particular, a GOTO from outside the range of such a block cannot transfer into the body of the 
block. Also, a GOTO which transfers from within such a block to a more global block is 
allowed, but is treated as a "bad-go-to". All "bad-go-to"s cause an effective loss of control, 
even if both the GOTO statement and the destination label are in (different) "control" state 
blocks. 

The BUZZ and UNLOCK constructs remain in the NEWP language, but the compiler now restricts 
their use to only control state environments; a syntax error is given for their use in normal 
state. 

In addition, compound statements which specify the STATSUMMARY compiler direction are now also 
treated as distinct blocks. 
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D3033 NEWP - PREVENT "GOTO" INTO "FOR" STATEMENT 

s:.ss.:'.; J!.::a~*M: x s::!J:r. s.*;.:.:r.,TJi'ss-i» .'is .k:zs::' m 

D3058 NEWP - INLINE PROCEDURES 
,.,i.. procedures cosine the efficiency of defines wi th the .J™^ V^^r.*:"*.^ 
„nhr!°nv„ca[ion n *Sli" a? lowao", e* Uvocatton'of "n'inline procedure maintains the semant.cs of 

order f?om local to global and separated by a slasft < / ; • 
Syntax : 

a) ' TneTelTeylord 'INLINE' will be a block directive allowed after the firs, 'BEGIN' of the 
procedure body of a procedure declaration. 



Example 



REAL PROCEDURE PROC; 
BEGIN [INLINE] 



END PROC; 



b) . Modules 

ftjTU" r.uKMi-MJ.JsriS :r.:.rfti\=;'.s:: '.".r^r^' " od "" 



jued if they 



ig 
Restrict ions : 

The following restrictions exist for inline procedures. Syntax errors will be is 
are violated, 
a) . Recurs ion 

Recursion of inline procedures is not allowed. 

b) . Parameters 

suicitv cs-tm.s' =s ':.K:;f";.!=i. k;t.%.3 .: rrsi-iis-Ks-r.':; 

inline procedure. 

c). IPC 

IPC commands, (e.g. PROCESS, RUN, etc.), may not specify an inline procedure. 

d) . Librar i es 

An inline procedure may not be exported as a library. 

e). Non-invocation references 

/„ „ makfppW LEXQFFSET. etc.), to inline procedures are not 
Non-invocation references, (e.g. MAKfcPCW, LEAurrsui , en. ;, 

a I 1 owed . 
f ) . RETURN and EXIT 

The RETURN and EXIT statements will not be allowed within the body of an inline procedure 

g) . Forwards 

An inline procedure may not be declared forward, 
h) . Initialization procedures 

An initialization procedure may not also be an inline procedure. 

i) . SORT statement 

An inline procedure may not be used in a SORT statement. 

j) . Module visibility 
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As a temporary restriction, the only imported items an exported inline procedure may use 
!" J"' exported from modules declared prior to the module containing ?he exported Lline 

JJJ u v Cull i 6 • 

D3064 NEWP - ARRAYS WITH UNSPECIFIED BOUNDS 

NEWP allows the indication that an array bound is unspecified. A bound pair of 0-1 indicates 
ElnH nSP if ,fl H- b °" nd - f Exce P l ^r this special case, the lower bound may no? exceed he upper 
tne^mens^^sToe 2„ sp^c.f \% . ' * ""*<>"' fi ed ' il — « •'«*« b. the Lst dimension IS'Vll 

!!l??i U H^!n i f^ d i bOU,,dS a " USed ' th ? r MCP (ARRAYDEC) is called if only the last dimension of a 
r!crrS;on s °Su!lt a fo? y the S ar^ PeC "^ FOf aU ° ther C8SeS ° f Un "" ecified b ° u " ds ' « --PtJ 
D3068 NEWP - "ALTERNATIVES" AND "INITIALIZATION" PROCEDURES 
Alternatives and Initialization Procedures 

Modules may now contain <ini t ial i zat ion procedures and <al t ernat i ve>s . 
Following is the new syntax for <module body> . 

<module body> 



< 



-< impor t-1 i s t > — 



-<declarat ion>- 



<al ternative> — 

<al ternat i ve> 



-<ini t ial i za t ion proceduro- 



— ALTERNATIVE — <al t ernat i ve id> 
>- BEGIN — alternative id> — ; - 



>- END — (alternative id> — ; 




<moduTe d body> " tainS anV "' l erna ' * ves > then an initialization procedure must appear last in the 

!L an ^?i! ia ! iZ !- i0n P roce ^ ure occurs in a module, all the items declared in the module, except 

tk ! ' !J U °? procedure arc unavailable until the initialization procedure is entered 
t J. h a 6 h H - , « ems 1 declar ?<J »» the module but outside any alternatives are initialized 

alternative is execCted *" "^ aVailable until and " nless » sel ^» statement for 'hat 

Items declared in 



items declared in a module but outside any alternatives are available inside all t 

a lterna ives in that module. Therefore, if a procedure is declared forward outs oe 

M™^"' ,tS 8CtUal d " Ur,tion must occur eith " outside the alternatives or inside ea 

ft * i c r iia t I Vc • 



he 

he 

ach 



Alternatives may not contain external procedurt 



Initialization Procedure 



The differences between initialization procedures and other procedures are: 

1. An initialization procedure may contain select statements. 

2. An initialization procedure may only occur as the last declaration in a <module body> . 

3 ' hI 1 in???!i dCC i ar S d ! ?u th - modu ! e ' but outside any alternative modules that might exist, will 
be initialized when the initialization procedure is entered. 
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4 An initialization procedure may only be executed once. A run-time fault will occur if an 

attempt is made to execute it a second time. 

5. The SEGMENT block direction may not be specified in the block directions for an 

initialization procedure. 

Select Statement 

<select statement> 

— SELECT — ( — alternative id> — ) 1 

The select statement initializes the module to include the the items declared inside the 

specified alternative id>. 

A select statement may only occur in an initialization procedure. 

Only one select statement may be executed in an initialization procedure. A run-time fault 
will occur if a second select statement is executed. 

Ex amp 1 e : 

BEGIN 

MODULE PHYSICALIO; 

EXPORT PHYSICALIOINITIALIZATION, 
DOCHARIO, 

BOOLEAN T iNITIALIZATION PROCEDURE PHYSICALIOINITIALIZATION(WHICHONE) ; 

VALUE WHICHONE; BOOLEAN WHICHONE; FORWARD; 
PROCEDIFRE DOCHARIO; FORWARD; 
INTEGER T; 
BEGIN PHYSICALIO; 
REAL R; 

ALTERNAT I VE HDPPHYS I CALI O ; 
BEGIN HDPPHYSICALIO; 
INTEGER I ; 
PROCEDURE DOCHARIO; 
BEGIN 

END DOCHARIO; 
END HDPPHYSICALIO; 
ALTERNAT I VE MPXPHYS I CAL I O ; 
BEGIN MPXPHYSICALIO; 

PROCEDURE DOCHARIO; 
BEGIN 

END DOCHARIO; 
REAL PROCEDURE IOFINISH68; 
BEGIN 
END IOFINISH68; 

B^LEAN P IN?TIALizATION PROCEDURE PHYSICALIOINITIALIZATION(WHICHONE) ; 

VALUE WHICHONE; BOOLEAN WHICHONE; 
BEGIN 

IF WHICHONE THEN 

SELECT ( HDPPHYS I CAL I O ) 
ELSE 

SELECT(MPXPHYSICALIO) ; 
PHYSICALIOINITIALIZATION :=WHICHONE; 
END PHYSICALIOINITIALIZATION; 
END PHYSICALIO; 
MODULE INITIALIZER; 

BEGI IMPORT FROM PHYSICALIO(PHYSICALIOINITIALIZATION) ; 

BOOLEAN WHICHONE; 

PROCEDURE GETITGOING; 

BEGIN 

PHYSICALIOINITIALIZATION(WHICHONE); 

END GETITGOING; 
END INITIALIZER; 
END. 

D3103 NEWP - EVENTS AND EVENT ARRAYS AS PARAMETERS 
Events may now be passed as parameters to libraries; event arrays may now be passed as 
parameters to procedures and libraries. 
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D3 106 NEWP - CLARIFICATION OF "MAKEPCW" RESTRICTIONS 

This note describes the use of and restrictions on the unsafe NEWP function MAKEPCW. 

MAKEPCW accepts as a parameter either a procedure id or a label id. The result returned is a 

word value containing the hardware PCW pointing to the code for the procedure or label. This 

PCW will properly have the NCSF field set to one for control state procedures and for labels 
declared in control state environments. 

Restrictions on the use of procedure ids: 

1. The procedure must not be declared EXTERNAL, NULL, LIBRARY, BY CALLING, or INLINE. 

2. The procedure must not still be FORWARD at the time of the MAKEPCW invocation. 

3. The MAKEPCW invocation cannot occur within the body of the procedure being passed as the 
parameter to MAKEPCW. 

Restrictions on the use of label ids: 

1. The declaration of the label must not be more global than the 

beginning of the code segment in which the label is used as a MAKEPCW parameter. 

2. The PCW generated points to the actual label occurrence, rather than to any hidden label 
generated for "bad GO TO" optimizations. 

D3110 NEWP - n <PROCEDURE NAME>. VALUE" 

Within the scope of a typed procedure, the value of the typed procedure may now be accessed via 
the following construct: 

<procedure name>. VALUE 

This construct may be used in expressions, assigned to, and address equated to. 

Ex amp) e : 

REAL PROCEDURE PROC; 

BEGIN [UNSAFE(MISC)] 
BOOLEAN B= PROC. VALUE; 
PROC. VALUE: =10; 
IF PROC.VALUE=20 THEN 

END PROC; 

D3151 NEWP - INCREASED HOST BLOCKS IZE 

The BLOCKSIZE of the compiler's HOST file has been increased from 270 to 2160 to reduce the I/O 
time and elapsed time for SEPCOMP. 

D3152 NEWP - ALLOW THE "MCP" TO FREEZE AS A LIBRARY 

The following changes have been made to NEWP to allow the MCP to freeze as a library: 

1. MCP is allowed as a value for the parameter to the FREEZE statement. This will only be 
allowed if the program being compiled has set the MCP dollar option. 

2. FREEZE(MCP) will be allowed in a block with no library export lists. It will export all 
entry points that occurred in library export lists at DO prior to that point in the 
symbolic. Any subsequent DO library export lists will get syntax errors The 
FREEZE(TEMPORARY) and FREEZE (PERMANENT) cases of the FREEZE statement will continue to be 
allowed only in the same block as a library export list. 

If a DO library export list is changed during sepcomp then any procedures with FREEZE(MCP) 
statements must be touched so that the FREEZE statement will be recompiled. 

Note that an export list in a module head (i.e. between the 'MODULE <module-id>' and the 'BEGIN 
<module-id>') is a module export list. An export list in any other location is considered to 
be a library export list. 

D3158 NEWP - MATCH "NEWP" CODEFILE LEVEL TO "BINDER" LEVEL 

The NEWP compiler now stores a bindinfo level in the codefile for the BINDER to check to ensure 
that the BINDER can bind that level of NEWP codefile. If the BINDER and NEWP levels mismatch 
an error will be given at bind time. * 
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il identifiers in the <value part> 



DEFINE expansion will not occur when processing the individual identifiers in tJi 

or specification part> of a procedure heading. This differs from ALGOL, which expands defines 

in these places . 

D3260 NEWP - "FIRSTFREEDOCELL" NOW DEFAULTS TO "10" 

The default value of the FIRSTFREEDOCELL block direction is now 10 (decimal) rather than 224 
(decimal). Furthermore, FIRSTFREEDOCELL is prevented from having a value less than 10 
(decimal). This causes no problem with the MCP, as its symbolic has an explicit setting for 
this block direction. 

In addition, a warning will now be issued when FIRSTFREEDOCELL has a value less than 222 
(decimal) and the dollar option STATISTICS is set (The compiler sets the va ue of 
MCPHIGHSTATNUM=(0,222) to the number of statistic entries when SSTATISTICS is set and 
FIRSTFREEDOCELL is greater than 222). 

D3261 NEWP - NEW FAULT NAME, "LIBLINKFAULT" 

A new fault name, LIBLINKFAULT, is now recognized by the compiler. This fault occurs during an 
unsuccessful attempt at linking libraries. The fault number is 21. This fault is trapped by 
the ON ANYFAULT declaration also. 

D3262 NEWP - NEW $ OPTION, "STANDALONE" 

A new $ option has been added to the NEWP compiler for use in compiling stand-alone system 
programs such as the SYSTEM/ LOADER . This option is SSTANDALONE To be effective this option 
must be set prior to the beginning of the program and $MCP must also be set. As with the MCP 
itself the compiler block directive on the outer block must specify into which code segment 
the outer block is to be compiled; e.g., SEGMENT=5 . In addition, the procedures that must run 
in control state must be specified as CONTROLSTATE in their block direction. 

This option causes the compiler to prepare a complete memory image of the program so that the 
program is "ready to run" when loaded into the system (starting at memory location zero). The 
maximum size of this memory image is 22,000 words. 

This memory image consists of the following items: 

1. The DO stack image (location (0,9) has been set to zero, this 
was the LINEINFO dictionary descriptor). 

2. All code segments. 

3 . All value arrays . 

4. All "pool data" items. 

5. The storage space for all SAVE arrays declared at a DO location. 

6. The proper entry PCW for the outer block at (0,3). 

7. A "memory" descriptor at (0,4). 

The memory image does NOT include: 

1 Allocated data storage for any array declared within a procedure 
or any DO array not declared to be SAVE. (No errors or warnings 
are given for these, as it is presumed that a proper presence- 
bit handling routine will be provided by the user.) 

2. No "memory links" are provided to separate any of the allocated 
s t orage areas . 

The code file generated by the NEWP compiler when the SSTANDALONE option is set contains only 
three items: 

1. A bootstrap in code segment 0. 

2. A valid "SEG0" in code segment 1. 

3. The memory image as described above, starting in code segment 2 
and continuing to the end of the file. 

The SEG0[18] word (the segment dictionary pointer) properly 
describes the DO image in the first part of the complete 
memory image. 

The code file does NOT contain any SEPCOMP information, no BINDINFO, no LINEINFO, and no PPB. 

If SSTACK is set, the SSTANDALONE option will print a table of the code segment descriptors and 
data descriptors in DO, indicating which ones remain absent and showing the memory locations ot 
the ones made present . 

D3283 NEWP - "XREFING" ALTERNATIVES 

Alternatives XREF in the same manner that modules XREF. 

If a procedure has its forward in a module but outside any alternatives and i 
each alternative, each "alternative" procedure body is XREFed as an alias of 



ts actual body in 

each of the other 
each alternative, eacn ai icrui- ■ ■ -- .......... ^ .,„„. ,„ „..—- -- „ ., _-- - 

"alternative" procedure bodies. 
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D3299 NEWP - CLOSE "LINE" AND "ERRORFILE" 

The compiler output files LINE (program listing) and ERRORFILE (error message) will now be 
closed at the end of compilation before production of the cross-reference (XREF) is begun, thus 
allowing examination of those output files without waiting until the XREF is finished. 

D3300 NEWP - SEGMENT IDENTIFIERS 

A new type of identifer, the <segment identifiers has been added. It is used to refer to a 
code segment. <Segment identifiers are declared in < segment declaration^. 

•(segment declaration 

SEGMENT .(identifier list> I 



An implicitly declared segment identifier, OUTERBLOCK, exists. It refers to the code segment 
that contains the outerblock code. 

SEGMENT is not a general type. It can only be used as described below. 

1. <segment identifiers are allowed in block directions of the form SEGMENT = < segment 
i dent i f i er> . 

2. Any variable that can normally be address equated, can be address equated to a < segment id>. 
Also, .-.segment id>s can be address equated but only to absolute addresses with lex level = 
and displacement less than the fixed DO fence. 

Ex amp 1 es : 

SEGMENT SEG1 = (0,1), % legal 

SEGA = (0,1000), % syntax error if 1000 is 

% above the fixed DO fence 

SEGB = (1,2), % syntax error because it's 

% not at lex 1 evel 

SEGC = REALID; % syntax error because it's 

% relative, not absolute 

% address equation 

WORD WSEG1 = SEG1; % legal 

3. <segment identifiers may occur in export lists and import lists. 

4. <segment identifiers are allowed as the parameter to LEXOFFSET and as the <location 
designator in <type> AT <location designator. 

Ex amp 1 es : 

REALID :=LEXOFFSET( SEGID ); 

WORDID:=WORD AT SEGID; 

A syntax error will be given if a <segment id> other than OUTERBLOCK is referenced with 
LEXOFFSET or AT but is never used in a SEGMENT block direction. This will prevent accessing 
a <segment id> when there is no code segment associated with it. 

D3401 NEWP - "PORTS" OPTION DISCONTINUED 

The PORTS option of Programdump is no longer recognized by NEWP. 
D3420 NEWP - "PARITYFAIL1 " FAULT 

PARITYFAIL1 may now be specified in an on statement when $B7000 is set. 
D3421 NEWP - "HEYOU" DISALLOWED ON "B7000" SYSTEMS 

Use of HEYOU under SB7000 is now a syntax error. 
D3422 NEWP - "ZAP" INTRINSIC FOR "B7000" 

The compiler no longer recognizes special syntax in the ZAP intrinsic under the SB7000 option. 
D3470 NEWP - "NEWP" STRING, NUMERIC CONSTANTS 

STRING AND NUMERIC CONSTANTS 



String constants and numeric constants have been added to NEWP. These two language components 
are syntactically distinct, thus the ambiguity between string and numeric constants present in 
ALGOL has been eliminated. 



STRING CONSTANTS 
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-<ebcdic string> 

-<ascii string> 

-<hexadec imal string>- 
-<bcl string> 
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<ebcdic string> 



<ebcdic string character) 



48 " <hex character) <hex character) 



<asc i i sir ing> 



<ascii string character 



— 47 " <hex character) <hex character) 

<hexadec imal string) 

I < 1 

4 " <hex character) " 



<bcl string) 



6 



" <bcl character) " 
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<hex character> 




2 — 

3 — 

4 — 

5 — 

6 — 

7 — 

8 — 

9 — 
A — 
B — 
C — 
D — 
E — 
F — 



<ebcdic string character) 

any ebcdic character except a quote (") 1 

<ascii string character) 

any ascii character except a quote (") 1 

<bcl character> 

— any be 1 character except a quote (") 1 

A string constant can be composed of EBCDIC(8-bi t ) , ASCI I (7-bit in 8-bit format), or 
hexadecimal (4-bi t ) characters. A string constant is always left justified. 

NOTE: The following are differences between NEWP and ALGOL string 
constants . 



in NEWP as 



in ALGOL. 



1. There will not be any implicit concatenation 
concatenation symbol is required. 

2. NEWP does not allow string constants to be considered as numeric 
without using the explicit type transfer function REAL. 



The 



constant s 



4. 

5. 

Examples 



NEWP uses the WFL rule for quoting a quote character not the ALGOL rule. To 
quote a quote character, two quote characters are required within a string 
constant . 

An empty string is denoted by " " rather than the word EMPTY. 

The "left justifying" prefixes (i.e. 80, 480, ...) are not implemented. 



8"ABCD123" ; 
"""WHY" & 48"6F" 



result = 'ABCD123' 

result = '"WHY?" 

result - an empty ebcdic string 

result = an empty ascii string 

result = an empty hex string 
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THE CONCATENATION OPERATION WITH STRING CONSTANTS 

Two or more string constants may be concatenated together by use of the <concat enat ion 
operator;.. The concatenation of two strings yields a new string whose length is the sum of the 
lengths of the two original strings. The value of the new string is formed by joining the 
second string immediately onto the end of the first string. 

Only string constants of the same character type may be concatenated. If they are not of the 
same type, a syntax error occurs. 

Ex amp 1 es 



"STRING" & "CONSTANT" 
"NUMBER" & 48 "Fl" 
47"3138" & 7 "ASCI I CHARACTERS" 
"" & "DOESNT DO MUCH" 



THE REPLACE STATEMENT WITH <string constant) SOURCE 



To make it possible to transfer data from a string to an array, a <string constant) may be used 
as <source part> in a <source list> in a REPLACE statement. 

Ex amp 1 es 

REPLACE P BY "STRING CONSTANT"; 
REPLACE P BY "STRING NUMBER " & 48"F1"; 



TYPE TRANSFER FUNCTION 

<REAL function) 

— REAL — ( — <string constant) — ) 



The REAL function returns as a real value the right justified bit image of the <string 
constant). All bits in each character are used The <string constant) may not exceed 48 bits 
in length. 

Ex amp 1 e s 

R := REAL( "STRING"); 

R := REAL("TOO LONG"); compi 1 e-t iime error 

NUMERIC CONSTANTS 

<number> 

<sign> <unsigned number) 1 

<numeric constant) 1 
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<numeric constant) 

<EBCDIC constant) 

<ASCII constant) 

<BCL constant) 

<hexadecima I constant) - 

<octal constant) 

<quaternary constant) — 

<binary constant) 

<EBCDIC constant) 
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g - 
80 



-/6\ <EBCDIC numeric character) 



<ASCI I constant) 

— 70 — 



/6\ <ASCI I numeric character) 



<BCL constant) 



6 ' /8\ <BCL numeric character) 



<hexadec imal constant) 



4 * /12\ <hexadecimal character) 

40 — 



<octal constant) 



— 30 — 



/16\ <octal character) 



<quaternary constant) 
— 20 — 



-/24\ (quaternary character) 



<binary constant) 



— 10 — 



-/48\ <binary character) 
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<binary character> 




<qua t ernar y character) 

- <binary character) 

_ 2 

— 3 



<octal character) 

- ^quaternary character) 

_ 4 

_ 5 

_ 6 

_ 7 



<hexadec imal character) 

- <octal character) 

. 8 

. 9 

- A 

_ b 

_ c 

_ d 

. £ 

_ F 



<BCL numeric character) 

any BCL character except a single quote (') — 

<ASCII numeric character) 

any ASCII character except a single quote (') 

<EBCDIC numeric character) 

any EBCDIC character except a single quote (') 



Numeric constants provide a way to specify a number as a bit mask (in 7 different bases or 
character sizes) in a general way which is not ambiguous with string constants and does not 
require any type transfer. This is accomplished by using the single quote (') character to 
specify a numeric constant. 

To specify a BCL, EBCDIC, or ASCII numeric constant which contains a single quote, two adjacent 
single quotes are used. 

As with ALGOL string constant semantics, left justification may be denoted by using a character 
code which is a multiple of 10. 

Numeric constants may not be less than 1 bit, nor may they exceed 48 bits in size. 
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D3486 NEWP - DIRECT "I/O" 

Direct I/O has been implemented in NEWP. The syntax and semantics for Direct I/O is the same 
as for the ALGOL Language. 

D3487 NEWP - "MCP" CODE FILE ROW SIZE = "504" 

The MCP no longer has any code segments large enough to require that the MCP code file have a 
row size of 1008 disk segments. 

The NEWP compiler and the BINDER will now construct an MCP code file with a row size of 504 
segments, as is done for other code and symbol files. 

D3530 NEWP - "FUNCTIONNAME, " "LIBACCESS" ATTRIBUTES 

Library declarations may now specify the FUNCTIONNAME and LIBACCESS attributes. FUNCTIONNAME 
is a string-valued attribute used to specify the system function name that will be used to find 
the target code file for the library. LIBACCESS is a mnemonic-valued attribute: the value 
BYTITLE indicates that the TITLE attribute of the library is to be used to find the library's 
code file. The value BYFUNCTION indicates that the FUNCTIONNAME is to be looked up in the MCP 
library function table which is maintained by the ODT message SL (see GENERAL note D3356) and 
the associated code file name will be used. 

D3535 NEWP - " PACKDEC I MAL " INTRINSIC 

The PACKDECIMAL intrinsic has been implemented in NEWP. 

Syntax : 

— PACKDECIMAL — ( — <arithmetic expression 1> — , > 

>-<ari thmet i c expression 2> — ) I 



The semantics of PACKDECIMAL are identical to the SCALERIGHTF function semantics in ALGOL. 
D3549 NEWP - "8-DIGIT" PATCH MARKS 

The NEWP compiler will now detect patch marks (in the TAPE file) which consist of exactly 8 
digits followed by either two blanks or two NULs . These patches marks have dots inserted so 
that they are listed as "dd . ddd . ddd" . 

D3590 NEWP - "DESCRIPTOR" PROCEDURES TO LIBRARIES 

Parameters of type DESCRIPTOR are now properly distinguished from the type word for procedures 
being exported or used by a library. 

D3 591 NEWP - PROCEDURE ENTRY VIA REFERENCES 

The "VIA" reference notation has been extended. In addition to the 

<type> VIA <word primary) 

form for simple objects, a similar form applies to procedure invocation: 

<procedure name> VIA <word primary-.. 

The <word primary> is used as a reference to effect procedure entry; it should result in an IRW 
to a PCW for the desired code in the appropriate environment. All type checking and parameter 

matching is performed according to the declared procedure heading, but the address couple of 
the procedure is irrelevant. 

Ex amp I es : 

T:=PROC VIA REFERENCE TO W (PARAM) 

MYGEORGE VIA WORDSPIB[SNR, SIRWTOPALACE] (WHY) 

D3592 NEWP - "PROTECTED" OPTION IN LIBRARY EXPORT LIST 

Library entry points declared in NEWP programs may now be exported with "protection". Such 
entry points may only be linked to by system libraries. 

New Syntax: 

— EXPORT > 

|- [ PROTECTED ] -| 

> <procedure i d> I 

|- AS <ebcdic string> -| 
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This feature is intended to be replaced with more general protection constructs in a future 
release. 

D3593 NEWP - "REGISTERS'' AND "DLL" 

The unsafe intrinsic REGISTERS may now be used with an integer constant parameter only. In 
addition, a new intrinsic, DLL, has been added which references the register D[LL] . DLL is 
available under UNSAFE(REGISTERS) . 

D3598 NEWP - "SYSTEMLIB" LIBRARY ATTRIBUTE 

A new Boolean library attribute, SYSTEMLIB, has been added to NEWP. When SYSTEMLIB is set, the 
associated library is to be initiated as a "system library"; therefore, it has access to 
protected MCP procedures. Use of this attribute requires the dollar option $MCP. 

D3608 NEWP - ARRAYS, DESCRIPTORS AS BY REFERENCE PARAMETERS 

Arrays and descriptors as by-reference parameters are distinguished as follows: 

1. Formal parameter as a descriptor: If an array row is the actual parameter, a reference to 
the one-word descriptor for the array row is passed (i.e., an SIRW to the descriptor). In 
this case, it is the descriptor in itself that is the object and may be directly modified. 

2. Formal parameter as an array: The reference passed is to the data segment of the array 
(i.e., a COPY descriptor is passed directly). The fact that a descriptor is used should be 
of no interest to the programmer. 

D3626 NEWP - RESIZING "EVENT ARRAYS" 

EVENT ARRAYs are now allowed to be resized. The syntax is analogous to that for an array row. 
The following are the changes to the syntax of the RESIZE statement on Page 5-91 of the ALGOL 
Reference Manual (Form No. 5001639): 

<resize s t at ement > : : =RESIZE(<res i ze array identifiers 

<arithmetic express ion><re tain old>) 
<resize array ident i f i er> : : =<ar ray row>|<evemt array row> 
<event array row> : : =<even t array i den t i f i e r > | 

<event array ident i fier> [ <row designator;.] 

RETAIN must be specified for EVENT ARRAYs. Also, if the new size is not greater than or equal 
to the old size, a run-time error will occur. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 

NEWP 

P2733 NEWP - IMPROVE "FILE/LIBRARY" DECLARATION HANDLING 

The NEWP compiler will no longer fault with an INVALID OP when a file identifier with an 
attribute list is address-equated, nor when a direct file identifier is address-equated. Also, 
redundant commas following a file or library identifier in a declaration list will now cause a 
syntax error. Finally, the DIRECT attribute will be placed in the FPB for a direct file before 
the attributes supplied by the user. In this way, other attributes related to a direct file 
may be properly set by the user. 

P2743 NEWP - BETTER LISTING FOR MODULAR "SEPCOMP" 

Several improvements have been made in the listing produced for SEPCOMP of a modular program. 
Previously, error messages and additional information (such as SSTACK) were improperly merged 
with the final listing when the messages related to a module head. Also, listing of source 
lines from a module head was not possible. These problems with modular SEPCOMP listings have 
been corrected. 

P2805 NEWP - ERROR FOR MISSING PROCEDURE 

An error is now given, rather than a warning, for a procedure with a forward but no body. 

P2 806 NEWP - ATTRIBUTE FOR TASK ARRAY ELEMENT 

The compiler now recognizes task attributes following a task array element and correctly 
compiles the expression. 

P2 807 NEWP - ERROR FOR EMPTY PARENTHESIS 

The compiler will give a syntax error if a parameter list is not found when a left parenthesis 
follows the declaration of a procedure identifier. 

P2934 NEWP - "IXREF" ENVIRONMENTS FOR CHEAP BLOCKS 

The NEWP compiler now generates the correct block environment information in its XREFFILES 
output files. This allows SYSTEM/ INTERACT I VEXREF to more correctly describe NEWP programs. 

P2946 NEWP - REDUCED TIME FOR "NEWP" "XREF" 

The amount of time (processor and I/O) needed to produce an XREF listing has been significantly 
reduced . 

P2947 NEWP - PREVENT "INVALID INDEX" 

The NEWP compiler will no longer get an INVALID INDEX when very long expressions are compiled 
or when an MCP that is very large is being compiled without resetting SNOBINDINFO. 

P3057 NEWP - ADDRESS EQUATION TO UNDECLARED IDENTIFIERS 

An error will now be given when a variable is address-equated to another variable that has 
occurred in an export list but has not been declared. 

P3082 NEWP - ERROR FOR DUPLICATE CASE ELEMENTS 

An error, rather than a warning, will be given for duplicate numbered case statement elements. 

Example : 

CASE I OF 

BEGIN 
1 : <STATEMENT> ; 
1 : <STATEMENT> ; % SYNTAX ERROR 

END; 

P308 7 NEWP - "SEPCOMP" LOSES SOURCE LINES 

There were several situations in which SEPCOMP would lose the first source line of a region. 
The compiler has been improved to correctly handle these situations. All of these situations 
involved patches which fell between or touched the boundaries of regions. 

P3140 NEWP - PREVENT COMPILER "SEG ARRAY" FAULT 

The compiler will no longer get a SEG ARRAY fault compiling programs with long library export 
lists. 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 NEWP 



PAGE 397 
B6000 SERIES MARK 32 



P3297 NEWP - COMPARING POINTER 



When a short (less than 7 characters) ASCII string constant was compared to a pointer (e.g., 
PTR=7"ABCD") , the compiler generated the literal for the string constant incorrectly. This 
problem no longer occurs. 

P3 344 NEWP - STACK OVERFLOW 

NEWP no longer faults with a stack overflow when handling many SOMITs , $VOIDs , or SVOIDTs 
within a raodu 1 e . 

P3 470 NEWP - "SEPCOMP" CREATES ERRONEOUS STACK ITEMS 

NEWP no longer creates erroneous stack items when additions are interspersed in a declaration 
list. 

Ex amp 1 e : 

REAL 

A, 

B, 

X, % ADDED BY SEPCOMP 

C, 

Y, % ADDED BY SEPCOMP 

D; 

Previously, the above condition caused the compiler to fault. 

P3627 NEWP - NULL ENVIRONMENTS IN "XREF" 

Under some circumstances, the interactive XREF proram functioned incorrectly in using a 
procedure name to specify a range. The problem, due to null entries made by the compiler, has 
been corrected. 

P362 8 NEWP - EXTRANEOUS "XREF" ENVIRONMENTS 

The compiler was improperly treating FOR and THRU loops as separate environments. This no 
longer occurs. 

P3629 NEWP - "<ARITHMETIC EXPRESSION IN <TABLE POINTER>" 

NEWP now generates proper code for the following Boolean expression: 

<ar i thmet i c expression> IN <table pointer> 
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DOCUMENT CHANGES NOTES (D NOTES) 
NSP DUMP ANALYZER 



D3430 NSPDUMPANALY - "NSP" DUMP ANALYZER IMPLEMENTATION 

SYSTEM/NSPDUMPANALYZER is a program which accepts a Network Support Processor (NSP) dump file 
as input (as produced by the B6900 Data Comm subsystem) and produces a printer file containing 
an analysis of the dump as output. 

This program is intended to be used by Burroughs' personnel for the support of the B6900 Data 
Comm Subsystem and by customer personnel for the generation of supporting documentation for 
Field Trouble Reports (FTRs) regarding the B6900 Data Comm subsystem. 

It may be run by using the following WFL command: 

RUN * SYSTEM/NSPDUMPANALYZER; VALUE=<NSP unit number > 

The file *DUMP/NSP/<NSP unit number> will be analyzed. 
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DOCUMENT CHANGES NOTES (D NOTES) 
PATCH 

D3007 PATCH - PATCH NUMBERS WITH "S .VERS I ON /CYCLE" 

PATCH now allows 4-digit patch numbers when using the $. VERSION and $. CYCLE options. The mark 
field in the record will contain the version number (2 digits), the cycle number (3 digits) and 

Column 90 will contain a blank. When 



the patch number (4 digits) with no separating periods, 
the mark field is listed, PATCH will insert periods bet 



tween the fields for readability. 
D3034 PATCH - NEW LIST AND COMPARE OPTIONS 

Several facilities have been added to SYSTEM/PATCH to make it more convenient to study the 
effect of merging several patches applied to one source symbolic. Briefly summarized, the 
changes are: 

The COMPARE option will now flag instances where lines from two different patches are 
adjacent or interleaved at the same point in the source. 

It is now possible, by setting COMPARE or a new option LISTD, to list the patch delimiter 
($#) cards but not the body of the patches. 

A new control option, FLAG, may be used to cause flagging of any line in the source whose 
patchmark ver s i on . eye 1 e is greater than a specified value. 

Also, a minor error has been corrected which caused the patch mark to be incorrectly shown as 
blank on a deleted line in the BRIEF summary of a long deletion. 

The following changes should be made to the System Software Operational Guide, Volume 1 (Form 
No. 5001563): 

Page 10-1-3 The description of the $. COMPARE option should now read as follows: 
"$. COMPARE 

This option causes SYSTEM/PATCH to print a report comparing the PATCH input with 
the TAPE file. All the patch cards are listed. Source lines from TAPE are shown 
when they are deleted by the patch or when they appear just before or just after a 
newly inserted line. Each line in the patch is identified in the rightmost column 
of the report: simple patch lines bear the ordinal patch number, while moved, 
resequenced or inserted lines are identified with original patch number (or as 
source) and the modifying patch number. If lines from more than one patch fall 
adjacent to each other, with no intervening unmodified TAPE source lines, the 
final column is prefixed with a ">" symbol. (Such "second-order conflicts" often 
require investigation.) Because all $ cards from the patch decks are shown in the 
compare listing, the same flags will appear if one patch inserts into an area 
voided by an earlier one. (If $. BRIEF is set, listing of deleted sections of the 
TAPE file are abridged.) 

COMPARE may be SET, RESET or POPped; the default is RESET. A compare listing will 
be produced only if COMPARE was last left SET. However, any time COMPARE is SET 
while LISTP is RESET during the input phase, patch delimiter cards are listed as 
though LISTD were set." 

The description of two new control cards, S.FLAG and $. LISTD should be added as follows: 

"$. FLAG 

Syntax 

FLAG option ::= $. FLAG <version nuntber> <cycle part> 

(<Version numbcr> and <cycle part> are the same as for $. VERSION.) 

Semant ics 

When the source file contains patchmarks in the form of version and cycle numbers, 
the FLAG option may be used to call attention (in the compare listing) to 
neighboring or deleted lines with marks equal to or greater than the specified 
value. Specifically, those source lines whose marks begin vv.ccc or vvece (where 
v and c represent digits) will be flagged if vv exceeds (version number> or vv 
equals (version number> and ccc is as great as <cycle number:*. If no <cycle part> 
is provided, <cycle number> defaults to zero. The flag consists of an asterisk 
("*") preceding the mark field. 

SET or RESET context is ignored for FLAG. If more than one FLAG value is 
provided, the last one specified is used throughout the compare phase; FLAG is 
ignored if COMPARE is not set and is not fully effective if BRlti* is set. 

"$. LISTD 
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If LISTD (or COMPARE) is set and LISTP is reset, each patch delimiter ($#) card 
and certain control ($.) cards will be listed. Each delimiter card is shown with 
the ordinal "patch number" assigned to that patch; this is the number used in the 
conflict and compare listings to refer to individual input patches. The following 
control cards are listed if LISTD or COMPARE is set when the control card is 
processed: $. BRIEF, J. CYCLE, $.FLAO, $. VERSION. LISTD may be SET, RESET or 
POPped. The default value is RESET." 

D3035 PATCH - "VERSION" MAY BE "RESET" 

The construct $. RESET VERSION now negates the effect of any $. VERSION or $. CYCLE 
specifications. No numbers may following the keyword VERSION in a RESET context. 

Page 10-1-12 of the System Software Operational Guide, Volume 1 (Form No. 5001563) should be 
changed as follows: 

The syntax for the VERSION option should now read as follows: 

"VERSION option ::= $. VERSION <version number> <cycle part> 
| $. RESET VERSION" 

Add the following sentence at the end of the Semantics: 

"$. RESET VERSION restores the default mechanism, as though no $. VERSION or $. CYCLE had 
appeared. " 

D3446 PATCH - HANDLING OF " $ " CARDS 

The B7000/B6000 System Software Operating Guide, Volume 1, (Form No. 5001563-001) should be 
modified as follows: On page 10-1-2, add the following new paragraph following first paragraph. 

"SYSTEM/PATCH requires that the compiler options SEQ, VOID and VOIDT be in a "RESET" state 
at the end of each patch. This requirement is unlike the compilers that allow these options 
various to remain "SET" at the time the end of the program text (or EOP) is encountered." 

D3447 PATCH - "$. MARK" OPTION VS SCARDS 

The B7000/B6000 System Software Operational Guide, Volume 1 (Form No. 5001563-001), should be 
modified as follows: on page 10-1-10, add the following as the last sentence to the first 
paragraph 

"The information retained by S.MARK is not stored into card images which contain a dollar($) 
in column one . " 

D3569 PATCH - CLARIFY ADDITIONAL "SYSTEM/PATCH" RULES 

The SYSTEM/PATCH description in SOG Reference Manual, Volume 1 (Form No. 5011661), should be 
revised by adding the following after the first paragraph on Page 10-3-2: 

"SYSTEM/PATCH enforced the following rules for sequence number and some $ cards. 

a. Within a patch (delimited by $# cards), all records not being resequenced must occur 
with increasing sequence numbers. Records which occur while $SEQ is set or when using 
S. INSERT (syntax 2) or J. MOVE (syntax 2) are not checked for the order of their sequence 
numbers . 

b. SYSTEM/PATCH requires that the $ options SEQ, VOID, VOIDT be in a RESET state at the end 
of each patch . " 

D3599 PATCH - "MARKBLANK" AND "DELIMOPT" OPTIONS 

Two new options have been provided for SYSTEM/PATCH. The following documentation may be added 
to the "$. Cards" section of SOG Reference Manual, Volume 1, (Form No. 5011661), Chapter 10. 

$ . MARKBLANK 

Syntax 

$. MARKBLANK 

Scmant i cs 

The MARKBLANK option provides a conditional form of MARK: If columns 81-90 of the input card 
image contain blanks, the Mark Level information is inserted as for MARK, but if columns 81-90 
already contain non-blank data, the field contents are retained. (Any card read from a file 
with MAXRECSIZE < 15 words or 90 characters is automatically blanked in columns 81-90, so in 
this esse MARKBLANK is equivalent to MARK.) 

The MARKBLANK option may be SET, RESET or POPped at any point in the input deck, and is 
effective for all normal input cards read until the option is changed. The default value is 
RESET. If both MARKBLANK and MARK are SET, MARKBLANK is effective. 
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$. DELIMOPT 

Syntax 

$. DELIMOPT 
Semant i cs 

The DELIMOPT option provides a mechanism to insulate succeeding patches from option changes in 
a particular patch. It causes certain options to be restored whenever a $# patch delimiter 
card is read. Specifically: 

Whenever DELIMOPT appears in on a $. card in a SET (or default) context, the option is set 
and the current value is recorded for each of the following options: 

BCL CONFLICT LISTP MARK MARKBLANK OUT 

Then whenever a $# patch delimiter card is read while DELIMOPT remains SET, all these 
options are restored to the values they had when DELIMOPT was last SET. (The stacked 
historical values of these options are RESET; thus a POP is equivalent to a RESET for an 
option like LISTP that has been restored by a $# card read while DELIMOPT was set.) 

DELIMOPT may be SET, RESET or POPped at any time; the default is RESET. If DELIMOPT is POPped 
from a RESET to a SET state, the option values to be restored remain those from the most recent 
occasion when DELIMOPT was SET, 

Pragmat i cs 

The simplest way to use DELIMOPT is to SET it as the last option before the first $# delimiter 
In the input set. Then the specified or default values of the several options will apply to 
each patch in turn, even if a prior patch had changed one or more option. 

Example 

S.SET COMPARE MARK DELIMOPT 
$#PATCH ONE 
J. MARKBLANK 

$#PATCH TWO 
S. RESET MARK 

$#PATCH THREE 

MARKBLANK will apply to the input for patch one but not patch two or three. Input in patch two 
will be unmarked, but the MARK specification wilt apply again to patch three. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
PATCH 

P2715 PATCH - CHARACTER MODE FILES 

PATCH will now handle character mode files (i.e., files with UN ITS CHARACTERS) . The entire 
record area (up to 90 characters) will be read rather than the first 15 characters. 

P2716 PATCH - OUT OF SEQUENCE PATCHES 

PATCH now detects out of sequence patches that have SVOID cards in them. 

P2717 PATCH - "$. GUARD" OPTION 

PATCH will no longer print garbage lines in the GUARDed output listing when $. GUARD is used and 
there are $ cards with no sequence numbers on them. 

P3630 PATCH - LINE WIDTH 

PATCH now correctly calculates the input line width for BCL and/or character-mode files. 
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PATCHCOOTROLWARE 



D3128 PATCHCW - INITIAL RELEASE OF " PATCHCONTROLWARE " 

SYSTEM/PATCHCONTROLWARE is a utility to patch Controlware files. It may be initiated from an 
ODT or remote terminal. The internal file name CONTROLWARE may be label-equated to the 
Controlware file to be patched. If the Controlware file is not found, the utility will request 
the file name to be entered. 

Patches are entered, one at a time, using the following format: 

CC PATCH [/DISP] [/PREV] <FILENAME> <SEGMENT> <ADDRESS-1> 
<ADDRESS-2> <LENGTH> [UA] [UN] <DATA> 
where : 

[...] denotes optional input 

/DISP causes <DATA> to be displayed/printed 

/PREV causes patched data to be displayed/printed 



<FILENAME> 

<SEGMENT> 

<ADDRESS-1> 

< ADDRESS- 2 > 

<LENGTH> 

UA 

UN 

<DATA> 



= name of file to be patched 
= zero relative segment address 
= zero relative memory address 
= zero relative digit address in segment 
= length of patch (maximum value of 30) 
= alpha data follows 
= numeric/hex data follows 
the patch itself 



<SEGMENT>, <ADDRESS>, and <LENGTH> are in decimal 



Enter STOP to terminate the program. 
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DOCUMENT CHANGES NOTES (D NOTES) 

PL I 

D3077 PLI - "TRANSLATE BIF" 

Page Al-12 of the PL/I Language Reference Manual (Form No. 5001530), in the section about the 
TRANSLATE BIF, should be corrected as follows: 

REFERENCE Paragraph 

The REFERENCE paragraph should read as follows: 

"Reference: TRANSLATE(S,R[ ,M] ) " 

ARGUMENTS Paragraph 

Add the following sentence to the end of the ARGUMENTS paragraph: 

"If M is omitted, COLLATE( ) is assumed as its value." 

D3172 PLI - "REWRITE" STATEMENT 

The following corrections should be made to the PL/I Language Reference Manual (Form No. 
5001530): 

1. Page 4-37 

The last sentence under "Semantics" should be changed to read as follows: 

"To access such a file, the sequence of statements should normally be READ followed by 
REWRITE. " 

2. Page 7-45 

Add the following new paragraph under "Semantics": 

"For a SEQUENTIAL UPDATE file, consecutive REWRITES, without READs , will increment the 
record pointer . " 

D3218 PLI - "CONVERSION" RETRY 

The PL/I Language Reference Manual (Form No. 5001530), Page A2-2, should be changed as follows: 

1. In the last sentence of the first paragraph under "CONVERSION:", the literal ", and the" 
should be changed to ". The". 

2. The following should be added to the end of the second paragraph under "CONVERSION:": 

"Note that expressions which are not variables, or variables which are procedure entry 
parameters, based, or overlay defined, may not be reevaluated after an on-unit. Therefore, 
changing the value of such an expression in an on-unit may not affect the conversion retry." 

D3307 PLI - EXPONENT ON "E" FORMAT OUTPUT 

The following changes should be made to the PL/I Language Reference Manual (Form No. 5001530), 
Page 8-23, under "Output Semantics": 

1. The sentence which reads "The <exponent> is an integer constant of N digits" should be 
changed to read as follows: "The <exponent> is an integer of 5 digits." 

2. The last paragraph should be changed as follows: 

"S+N+3" should be changed to "S+8" 
"S+N+4" should be changed to "S+9" 
"S+N+2" should be changed to "S+7" 

D3352 PLI - MODIFICATIONS TO SUPPORT PORT FILES 

The following changes to PL/I have been made to support multi-subfile port files. (See Mark 32 
GENERAL note D36S0, "Implementation of Port Files", for a description of port files.) 

1. The SIGNAL and RESPONSE elements of READ and WRITE statements have been de impl ement ed . 

2. The syntax of READ, WRITE, OPEN and CLOSE statements is appended with an optional subfile 
identification clause. 

New SUBFILE Clause Syntax: 

— SUBFILE — ( — <sca 1 ar-express i on> — ) — | 
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not equal to PORT raises the UNDEFINEDFILE condition. 

T . va ,„, nf the e ,oression in the SUBFILE clause determines which subfile in a port file is 
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(only) subfile will be closed. 

or pseudo-variable. 
3. An optional DONTWAIT clause has been added to the syntax for READ and WRITE statements. 

New DONTWAIT Clause Syntax: 

DONTWAIT — ( — <scalair-expression> — ) — | 

» j .... »h. ..,«» ritc 1 1 A value of 'O'B. or abscnse of the DONTWAIT 

buffer is available. 

If the expression in the DONTWAIT clause is a variable or pseudo-variable, after the read or 

write the following is stored in the variable oir pseudo-variable: 

•1'B if the read or write was not done because no data 
was ready to be read or no buffer was available, 
'O'B if the read or write was done. 
Execution of a READ or WRITE statement with a DONTWAIT clause for a file with KIND not equal 
to PORT raises the UNDEFINEDFILE condition. 
4. Three additional option keywords are allowed in OPEN statements: 

WAIT 

AVAILABLE 

OFFER 

WAIT is the default . 
5 A new close option, DONTWAIT, is allowed for port files. This option causes processing to 
continue without waiting for the file to be closed. 

6. A WAIT statement has been added to PL/I . 
WAIT Statement Syntax: 

| < , 

WAIT — ( <event-valued-at t r ibute> ) > 

~ 1 

- EVENTNO — ( — <scalar-var i abl e> — ) -| 



pseudo-variable . 
D3511 PLI - INCLUDED COMPILE TIME PROCEDURE 

The following sentence should be added to the end of Section 11.7.7 of the PL/I Reference 

Manual (Form No. 5001530): 

"If a compile-time procedure in an include file is to be called from the containing text, 
the containing text must have an entry declaration for the procedure. 
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D3519 PLI - ARRAY ELEMENTS AS SORT KEYS 

Section 7.3.2.8 of the PL/I Reference Manual (Form No. 5001530), should be revised as follows: 

Add the following to the "Restrictions" listed: 

"Indexed array elements cannot be used as keys." 

Delete the following from the example: 

"DCL AR(IO);" 

The second statement from the list of legal sort statements. 

D3546 PLI - BINDING PROGRAMS WITH "DUMP" OPTION 

Binding of dump information in PL/I programs has never been implemented. When a 
binder-produced codefile calls the PLI PROORAMDUMP intrinsic, the intrinsic gets an error 
because no dump information is in the codefile. To ensure that this error does not occur 
setting the PL/I compiler option DUMP will automatically set NOBINDINFO. Resetting NOBINDINFO 
when DUMP is set will cause a syntax error. 

D3559 PLI - "ONCHAR" , "ONSOURCE" 

The PL/I Reference Manual (Form No. 5001530), should be corrected as follows: 

On Page Al-31, add the following sentence to the paragraph about the results of the ONCHAR 
bui 1 1 in funct ion: 

"If the conversion condition occurred during a stream I/O statement, using ONCHAR in or 
after a stream I/O statement in the on-unit will produce undefined results." 

On Page Al-33, add the following sentence to the paragraph about the results of the ONSOURCE 
bui 1 1 ing functon : 

"If the conversion condition occurred during a stream I/O statement, using ONSOURCE in or 
after a stream I/O statement in the on-unit will produce undefined results." 

D3 560 PLI - "ONLOC" BUILTIN FUNCTION 

On Page Al-33 of the PL/I Reference Manual, (Form No. 5001530), Add the following sentence to 
the end of the paragraph about the results of the ONLOC builtin function: 

"ONLOC is not presently implemented." 

D3561 PLI - "UNSPEC" PSEUDO VARIABLE 

On Page Al-38 of the PL/I Reference Manual (Form No. 5001530), add the following sentence to 
the end of the paragraph about the UNSPEC pseudo-variable: 

"V may not be a double-precision arithmetic item." 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 



PL I 



P2718 PLI - EXPONENTIATION MIXING OPERANDS 
The PL/I compiler neglected to generate code to extend single precision operands for performing 
exponentiation between single and double precision operands. 

This problem has been corrected. 

Ex amp 1 e : 

DCL SP BIN FLOAT (30), 
DP BIN FLOAT (60); 
DP=DP**SP; DP=SP**DP; 

Both expressions previously gave incorrect results; now, they both give correct results. 
P2719 PLI - CORRECT "ATAND" 
The ATAND function returns its value in radians rather than degrees when called with a single 
operand. This problem has been corrected. 

P2720 PLI - DOUBLE PRECISION "PICTURE 'H' " 
When PICTURE 'H' data items were used as arithmetic operands, they were not properly extended 
to double precision when their values were less than 8 U. 

This has been corrected. 

Ex amp 1 e : 

DCL (A,B,C) PIC , (13)H' ; 

A=65258542947; B=5 145 1 1850145 ; 

C=A+B; 
Previously, the value of C was incorrectly calculated to 579770393096; now it is properly 
calculated to 579770393092. 

P2721 PLI - "SUBSTR" OF BINARY DATA 
SUBSTR converted binary data to a character string instead of a bit string. 
This has been corrected. 
Examp 1 a : 

DCL (X,Y) BIN FIXED; 
Y=SUBSTR(X,6,6); 

Previously, X was converted to character, resulting in a " STR-TO-AR I TH CONVERSION" error; now, 
X is properly converted to a bit string. 

P2722 PLI - BRANCHING FROM START OF SEGMENT 
Branches from the first syllable of code segments were not always generated correctly. 

Ex amp 1 e : 

P:PROC; 

DCL A(5); 

GO TO Q; 

PUT EDIT (A(l)) (F(3)); 
Q:END; 

This program previously produced an INVALID OP because the GOTO statement was not generated in 
the proplr place in the code; the problem has been corrected. 

P2767 PLI - SYSTEM FILE ATTRIBUTE PARAMETERS 
The syntax for run-time references of system file attributes, for both reading and setting, has 
been changed to include a place for two optional parameters. 

Old Syntax: 

<attribute name> ( < int ernal-f i 1 e-name> ) 

New Syntax: 
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<at t r ibute-name> (<internal-fi le-name> 
[,<scalar-expression> [,<scalar-expression>]]) 

The two new parameters will be interpreted as follows: If KIND= ' REMOTE' , parameter one will 
identify STATION number and parameter two will not be allowed; if KIND='PORT', parameter one 
will identify subfile index and parameter two will not be allowed; if KIND='DISK' or 'PACK', 
one parameter will refer to row number, and two parameters will refer to row number followed by 
copy number. 

P2769 PL I - STATEMENT NUMBERS IN ERROR MESSAGES 

The statement numbers and record numbers in error messages displayed in CANDE from pass one of 
the PL/I compiler pointed to the statement before the one to which the message was addressed 
Now, the correct statement numbers are given. 

P2808 PLI - PRECEDENCE OF OPERATORS 

Previously, operations of the same priority were always performed from left to right. Now 
operations of the same priority are performed from left to right except when they are of the 
highest priority (not, **, prefix -, prefix +), in which case they are performed from right to 

Ex amp 1 es : 

Expression Was Interpreted Now Interpreted 

A**B"*C (A**B)**C A**(B**C) 

-A»*B (-A)*»B -(A**B) 

A*»-B"C (A**(-B))**C A**(-(B**C)) 

This is in accordance with the PL/I Language Reference Manual and ANSI Standards. 
P2809 PLI - DUPLICATE LABEL AND ENTRY NAME 

The PL/I compiler looped when a statement label was followed by an identical procedure on the 
same level; e.g., 

... L: ... ; L:PROC; . . . ; END ; . . . 

This problem has been corrected. 

P2810 PLI - "PIC'(12)HS'" 

The PL/I compiler generated incorrect code for storing a value in a field declared PIC'(12)HS' 
This problem has been corrected. 

P2840 PLI - "OR" OPERATION ON "BDMS" FIELD BITS 

When a bit from a BDMS item defined as FIELD (BIT1 ,BIT2 . . . ) was ORed with a data item defined 
BIT(l), incorrect code was sometimes generated by the PL/I compiler. 

Ex amp 1 e : 

DCL B BIT(l); B='1'B; DATASET. FIELD. BIT1='0'B- 
IF DATASET. FIELD. BIT1 | -,B THEN 

DISPLAY ('THIS SHOULDNT HAPPEN'); 

Previously, the IF statement gave the wrong results; this problem has been corrected. 
P2841 PLI - ":=" AS ASSIGNMENT OPERATOR 

Previously, the use of ":=" as an assignment operator caused the compiler to loop. The problem 
has been corrected; now, an error message is given. 

P2850 PLI - UNDEFINED FORMAT 

Previously, the PL/I compiler aborted with an INVALID INDEX when an undeclared format was 
referenced by a GET EDIT statement. 

Ex amp 1 e : 

GET EDIT(A) (R(<format label>)); 

The example caused the INVALID INDEX when <format label> was not defined. 

The compilation now completes, generating the appropriate error message, without getting an 
INVALID INDEX. 
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P2870 PLI - LOGICAL OPERATIONS ON "BIT" STRINGS 

The PL/I compiler sometimes generated incorrect code for expressions which used both NOT and 
Sr/AND ope?Si ions on operands of the same length. The problem occurred only when at least one 
operand was part of a structure. 

Example : 

DCL 1 S, 

2 (B1.B2) BIT(l); 
B1='0'B; B2='1'B; 
IF Bl | -i B2 THEN 

returned true. 
Now, correct code is generated for such expressions. 
P2907 PLI - STACK CELL FOR "ELSE" 
The PL/I compiler erroneously allocated a stack cell for an ELSE if the ELSE were followed by a 
condi t ion pref i x . 

Example: 

IF FALSE THEN; ELSE (SIZE): 1=1+1; 
The stack cell is no longer allocated. 
P2911 PLI - "SORT" COMPARES ON PICTURED KEYS 

an evaluation and arithmetic compare. 

P^CTUReVaRITHME^C 'con^s-on'^picTURE: u^or Tor P^s Xch arTt^ 9 °Ull 
nof^ The aoove li.ted symbols, will continue tc, cause generation of characters compares .n 
SORTs . 
P2912 PLI - "LABELTYPE=' OMITTED'" 

wfc.n tW file attribute LABELTYPE was assigned 'OMITTED', the PL/I compiler caused the 
lurioute lo be le! ?ncorretTTy to OMITTEDEOF ' . Now the correct attribute ass.gnment >. made. 

P2935 PLI - MORE THAN 48 "%DO" STATEMENTS 

The PL/I compiler would get an INVALID INDEX when more than 48 %DO statements occurred even if 
They were no? nested Now, the compiler handles any number of non-nested *DO statements. 

P2982 PLI - INDEPENDENT TASK INITIATION 
PL/I's facility for initiating an independent task did not work properly, as follows: 
1. A CALL of a TASK with OPTIONS (INDEPENDENT) and no parameters caused the compiler to emit 

code which resulted in an INVALID OP. 
2 The data descriptor to bindinfo for an EXTERNAL ENTRY was generated with an incorrect length 

field. 
These problems have been corrected. 
P3006 PLI - POINTER INITIALIZATION 

Initialization of a pointer withNULL(), as shown in the following example, caused a PL/I 
co^Uer erro?, even P ?hough the pointer initialization worked correctly for other values: 

DCL P POINTER INITIAL(NULL() ) ; 
Now, a pointer can be initialized with NULLQ. 
P3016 PLI - IGNORED "LENGTH" OR "INITIAL" SPECIFICATIONS 
Previously, no warning message was generated when the PL/I compiler ignored LENGTH or INITIAL 
specifications on group items. 

Ex amp 1 e : 

DECLARE 1 A CHAR(IO), 
2 B CHAR(20), 
2 C CHAR(30); 
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The "CHAR(IO)" following "A" was ignored by the compiler. 

Now, a warning message is generated when LENGTH or INITIAL attribute specifications are 
ignored. 

P3017 PLI - STRING BUILTIN FUNCTIONS 

The following string built in functions sometimes produced incorrect results when an argument 
expression contained a string concatenation: 

TRANSLATE BEFORE AFTER UPTO 
FROM DECAT COPY REPEAT 

Ex amp 1 e : 

TRANSLATE(S1,S2| |S3,S4) 

These builtin functions now produce correct results. 

P3018 PLI - "DIMENSION" NOT FIRST ATTRIBUTE 

When a DIMENSION attribute specification was not the first attribute of a declaration and 
appeared without the keyword "DIMENSION", the PL/I compiler failed to give a warning message. 

Example : 

DCL A CHAR(l) (10); 

The example should give a warning message because "(10)" should either immediately follow "A" 
or be preceded by the keyword "DIMENSION" . 

An appropriate warning message is now generated. 

P3043 PLI - "EXCEPT" BUILTIN FUNCTION 

The builtin function EXCEPT did not work correctly if either of its arguments was not a 
character string, because the arguments were not automatically converted to character strings 
Now, arguments are automatically converted to character strings. 

P3044 PLI - ILLEGAL PRIMARY 

An assignment of a structure to a numeric variable was flagged by the PL/I compiler as both a 
user error and a compiler error. Now, the compiler error is no longer generated. 

P3058 PLI - "PIC 'X'" ARRAY ELEMENTS 

Array elements of type PIC 'X' could not be converted to or moved into any data type other than 
CHAR without causing an INVALID OP. Now, PIX 'X' array items are converted and moved 
correct ly . 

Exampl e : 

DCL A BIN FIXED, 

B PIC'(25)X' , 

C(0:3) PIC*(25)X'; 
A=C( 1 ) ; 
B=C(2); 

Previously, both of the above assignment statements caused INVALID OPs ; now, both work 
correct 1 y . 

P3062 PLI - COMPILETIME "DO" AND "INCLUDE" 

When the record number of a %DO in a ^INCLUDE file was equal to the record number of a %DO in 
the source file or another %INCLUDE file, the PL/I compiler sometimes looped. This problem has 
been cor rec t ed . 

P3088 PLI - "BIT" COMPARES 

I. h ,S,EV yI ,. compi ,er sometimes generated incorrect code for comparisons of BIT constants with some 
BUILTIN functions which produce variable length results. 

Exampl e : 

IF '0'B=REPEAT( '0' ,L) THEN; 

The compiler generated code which caused an INVALID INDEX. 

Now, correct code is generated for such comparisons. 
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P3143 PLI - "PUT EDIT" OF "PIC 1" VARIABLES 
Pr.-vim.Ov a PUT EDIT of a variable declared PIC'(n)l' caused either incorrect results or an 
INVALID OP! NawPIC " variables are properly handled by PUT EDIT statements. 

Ex amp 1 e : 

DCL P PIC (31)1' ; 

PUT EDIT(P) (E(20,10)); 

The example PUT EDIT statement failed previously; now, it works correctly. 
P3211 PLI - PARAMETER MISMATCH WITH "NOBINDINFO" 

PL/I compilations with NOBINDINFO set failed to produce information in the codefile which is 
necessary for initiating a user task. Now, the necessary .nformat.on is generated. 

P3212 PLI - LIBRARY CAPABLE BIT 

T . lihrarv canable bit in the compiler info word in See zero was not being set by the 
compter "It tSnow se! for all PL? I programs which contafn a FREEZE statement. 

P3310 PLI - INAPPROPRIATE WARNING MESSAGES 
Two warning messages were sometimes emitted by the PL/I compiler when no such warnings were 
appropriate. The messages were the following: 

1 "SCALE FACTOR IGNORED FOR FLOAT ATTRIBUTE (LEVEL 3)" which was sometimes wrongly generated 
for ENTRY VARIABLE declarations. 

2 "LENGTH, PRECISION, OR INITIALIZATION OF GROUP ITEM IGNORED (LEVEL 1)" which was sometimes 
' incorrectly emitted for group items with the DEFINED attribute. 

Now, the warnings are given only when appropriate. 
P3337 PLI - BIT STRING COMPARISONS 
The PL/I compiler will now generate correct code for bit string comparisons of the form. 

(An=B) -i=C. 
P3367 PLI - "PUT EDIT" OF BIT VARIABLES 
Statements of the following form, which previously could cause fatal system dumps, now work 
correct ly : 

PUT EDIT (B) (F(n)); 
where B is a bit variable, and n is an integer. 
P3471 PLI - ERROR "TASK IDENTIFIER REQUIRED" 
The error "TASK IDENTIFIER REQUIRED" is now always a level 9 error; thus, the compiler no 
longer generates a code file when the error is detected. 

P3472 PLI - BIT STRING DEFINED 

St" IVAl? d o!nerw!se S "J f' i s^aTaclr ' llXV. ' Prev^ously^"^^! &\ 'trinket ineS 
over a character s r ! the comp "er incorrectly syntax-checked the POSITION attribute as if 
?I were in character g un!ts. Now, the POSITION at t r ibute is syntax-checked .n bit units as it 
should be. 
P3473 PLI - BIT OVERLAY DEFINING 
On the Mark 31 release of the PL/I compiler, defining a bit string over a bit string sometimes 
caused incorrect syntax errors or incorrect results. 

Ex amp 1 e : 

DCL A BIT (16); 

DCL B BIT (8) DEF A POS (5); 

The above example now compiles correctly. The above e xampl « •J?° f^Sil'" correCtly ° n the 
Mark 30 release, but compiled incorrectly on the initial Mark 31 software. 

P3474 PLI - "WRITE" WITHOUT "FROM" 

now work properly as they did on the Mark 30 release. 
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P3475 PL I - COMPILER LOOP CORRECTED 



If the last item on a line ended in column 72, and was part of a statement, and the next line 
were blank, and LIST2 were set, the PL/I compiler would loop indefinitely. This no longer 
occurs . 

P3476 PL1 - BAD DECLARATION CAUSED "INVALID INDEX" 

If the first procedure declaration of a PL/I program was not preceded by an entry name and a 
colon, the PL/I compiler would sometimes get an INVALID INDEX. Now, the proper error message 
is emitted and an INVALID INDEX does not abort the compile. 

P3477 PL I - LOST TEXT FROM COMPILE-TIME PROCEDURE 

When a compi 1 e-t ime procedure was invoked without parameters and without an empty set of 
parenthesis, and the invocation was immediately followed by a comment, part of the source text 
following the comment was sometimes lost by the PL/I compiler. 

Ex ampl e : 

COMPILETIMEPROC /* COMMENT */ 
PUT DATA; 

The above example now compiles correctly; previously, the "PUT" was lost by the compiler's 
scanner. 

P3510 PLI - QUESTION MARK 

A question mark in column 1 or 2 of a PL/I program should terminate a compile (as described in 
Mark 29 note D2120); however, the PL/I compiler was erroneously terminating at the occurrence 
of a question mark anywhere when not included in a comment or literal. Now, a question mark 
not in columns 1 or 2, not contained in a comment or literal, is treated as an invalid 
character, and does not terminate the compile. A blank is assumed in its place, and a warning 
message is emitted. 

P3511 PLI - BAD LINEINFO 

Previously, when a PL/I program's segment dictionary length exceeded 99 words, bad lineinfo was 
generated. This no longer occurs. 

P3512 PLI - EXTERNAL FILE VARIABLES 

Previously, a file variable declared external was syntaxed with "REFERENCE IS EXPECTED" when an 
attempt was made to assign a file to it. Now, external file variables are implemented 
correct ly . 

P3513 PLI - "LENGTH(STRING(<ID>))" IN SUBSTR ARGUMENT 

If the second argument of the SUBSTR built-in function were an expression containing the 
fo 1 1 owi ng : 

LENGTH(STRING(<exp>)) 

and <exp> had a constant length, incorrect code was sometimes generated by the PL/I compiler. 
This problem has been corrected. 

P3548 PLI - "PICTURE Y" 

When a picture contains leading-zero-suppression ( 'Z' or '*') followed by 

unconditional-zero-suppression ('Y'), a zero in the digit referenced by the first Y of the 

picture was sometimes not changed to a blank. Now, mixing leading and unconditional 
zero-suppression works correctly. 

P3 549 PLI - "ROUND" BUILTIN FUNCTION 

Use of a complicated expression, rather than an integer constant, as the second argument to the 
ROUND builtin function sometimes caused the PL/I compiler to loop indefinitely. This no longer 
occurs . 

P3 550 PLI - LEVEL "3" WARNING MESSAGE 

When the PL/I compiler's estimate of the memory requirements of a program exceeds the amount of 
space allotted to PL/I programs, the following level-3 warning message is now emitted: 

"ESTIMATED MEMORY REQUIREMENTS EXCEED ALLOTTED SPACE" 
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P3')51 PLI - PROBLEM WITH PICTURES 

xorrect C ed d The proo, em'was"*.^ t Eld." «- ™T EDIT of PICTUREd variables. 
P3 593 PLI - LARGE STRUCTURES WITH "INITIAL" ATTRIBUTE 

faults in this situation. 
P3752 PLI - BIT EXPRESSIONS 
Expressions of the following form were sometimes evaluated to incorrect results: 

<bit expression> &-> B 

such that B is a BIT(l) item in a structure or data set. 

Now, correct code is generated by the PL/I compiler, so that results of such expressions are 
always correct . 
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DOCUMENT CHANGES NOTES (D NOTES) 
PL I SUPPORT 

D3374 PLISUPP - "SYSTEM/PLI SUPPORT" 

The file SYSTEM/PLI SUPPORT has been implemented to provide run-time support for PLI in future 
re leases . rr 

D3394 PLISUPP - IMPLICIT OPENING OF FILES 

On releases Mark 3 



On releases Mark 31 and earlier, the MYUSE attribute of a file was unchanged by implicit fil 
opens Now in accordance with ANSI standards, implicit file opens will have the followin 
eitects on the MYUSE attribute: 

GET: MYUSE will be INPUT. 

PUT: MYUSE will be OUTPUT. 

READ: If MYUSE is not already UPDATE, it will be changed to INPUT 

SSilf-U, }^ mVSE is not alread y UPDATE, it will be changed to OUTPUT. 

REWRITE; MYUSE will be UPDATE. 

DELETE: MYUSE will be UPDATE. 

LOCATE: MYUSE will be OUTPUT. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 



PL I SUPPORT 



P2723 PLISUPP - INCORRECT CONVERSION CONDITION 
A conversion condition occurred when picture fields such as PIC 'ZZV.ZZ' were evaluated if they 
held a value between 1 and 0. The problem has been corrected. 

Ex amp 1 e : 

DCL P PIC 'ZZV.ZZ' ; s 

P=0 . 5 ; 
A=P; 
The last statement previously raised the conversion condition; now, the statement is properly 
executed . 
P2872 PLISUPP - "CHAR" TO "ARITH" CONVERSION 

Should have raised the CONVERSION CONDITION, but did not: 

'1234-' 
•12+-23' 
'-1 + ' 
Now, the CONVERSION CONDITION is raised whenever plus or minus signs appear in the wrong 

places . 
P2908 PLISUPP - "GET DATA" CROSSING RECORD BOUNARIES 
A GET DATA statement would produce incorrect results if a number to be read crossed a record 
boundary . 

Ex amp 1 e : 

X = 123456 
The record boundary occurred between 3 and 4; consequently, an incorrect value was assigned to 
X. 

The problem has been corrected; now, a GET data statement will get correct results when data 
items cross record boundaries. 

P3213 PLISUPP - "ISAM, DELETE" 

s:^ri^5r*^ , V!^K^*"-*e:a:r , .::i.5^ J S5-:-T!: , c;. r :"'S.i:«arf:^:!:«i*:a 

Coarse tables. 
1P3214 PLISUPP - "ISAM," SECURITY ERROR 
The following sequence of events sometimes caused a security error (IO ERROR #19): 

1. Update the ISAM file. 

2. Close the file. „,»ooa i M 
3 Change the security of the ISAM file to CLASSA IN. 

4! Attempt to open the file for INPUT and read from the file. 

The security error will no longer occur. 
P3215 PLISUPP - "ISAM," DUPLICATE RECORD KEYS 
Sinre the 29 PR1 release, writing of records with duplicate keys to ISAM files opened UPDATE 
often produced incorrect' links in the ISAM file. Now, correct links are maintained. 

P3216 PLISUPP - "REWRITE," ZERO IN FIRST WORD 
In a PL/I program, REWRITing from a structure with zero in the first word to a keyed file 
caused the entire record to be zeroed. Now, the REWRITE is done correcny 

P3217 PLISUPP - EMPTY "ISAM" FILE 
Closing an empty ISAM file which was opened OUTPUT will now cause an exception condition, as 
fol lows : 

Primitive Method: „„,.,, v . .„ i 

In the returned Boolean, 25:1 will be set to 1. 

COBOL with ANSI74 set: 

FILE STATUS will be set to 23. 
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PL/I: Condition code 2517 - CANNOT CREATE EMPTY KEYED FILE. 
P3365 PLISUPP - "ISAM" PARITY ERROR TO "COBOL" 

When a parity error occurs on an ISAM file, an incorrect value is no longer returned to COBOL 
programs . 

P3366 PLISUPP - "ISAM" LOGICAL DELETE 

If the last record of an ISAM file is logically deleted, a garbage record is no longer returned 
when the file is read sequentially. 

P3367 PLISUPP - "PUT EDIT" OF BIT VARIABLES 

Statements of the following form, which previously could cause fatal system dumps, now work 

vUi l c u i i y i 

PUT EDIT (B) (F(n)); 

where B is a bit variable, and n is an integer. 

P3514 PLISUPP - "PL/ I" PROGRAMDUMP 

The PL/ I Programdump intrinsic did not work correctly on the initial Mark 31 release. It now 
works as it did on the Mark 30 release. 

P3515 PLISUPP - "PL/ I" PROGRAMDUMP 

The PL/I Programdump intrinsic failed when processing a block containing more than 130 
identifiers. Now, any number of identifiers in a block are handled. 

P3552 PLISUPP - "GET DATA" LOOP 

^.£! ^ !; n !!! e ^U'r n*4•? U * , s !« n . out °f P la ? e '■;. an in P"t stream to a GET DATA statement sometimes 
caused the GET DATA intrinsic to loop indefinitely. This no longer occurs. 
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DOCUMENT CHANGES NOTES (D NOTES) 
PLI INTRINSHCS 

D3 600 PLINTRN - DELETE OLD INTRINSICS 

• i. >■ -i. tn p»i r.i.a.f oo that the compiler references the MCP's 
ITTRISlEA^CHSRt^ner^or? r ATrR?BSEA^CHER , „r s e bee„ deleted from the PL/I intrinsic*. 

D3630 PLINTRN - "PLINTRN" SUBSUMED BY "PLISUPPORT" 
Effective with the Mark 32 release, the PL/I intrinsic* have been subsumed by the PLISUPPORT 
library, described in GENERAL note D3354. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
PRINT BINDER INFO 



P3438 PRINTBIND - "BINDINFO" FOR ALTERNATIVES 

BINDINFO is now generated for MCP ALTERNATIVES. This was added mainly for DUMPANALYZER . 

P3596 PRINTBIND - ELIMINATE "EOF NO LABEL" ABORT 

PRINTBINDINFO could terminate for an "EOF NO LABEL" error when analyzing what appeared to be an 
external procedure, but what was really a non-existent entry after the end of the segment 
dictionary of the program. This no longer occurs. 

P3597 PRINTBIND - HANDLING OF PROCEDURE PARAMETERS 

PRINTBINDINFO was incorrectly handling "BY REFERENCE" parameters which followed a procedure 
parameter. This problem has been corrected. 
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DOCUMENT CHANGES NOTES (D NOTES) 
REMOTE JOB ENTRY 



The name that is di 

of the MCS, thus allowing 



#2972 RJE - "PUT/FETCH" RECORD COMPATIBILITY 

RJE's PUT/FETCH (COPY) record format is now compatible with non-6000/7000 systems (B1800, 

B800) . 
D3036 RJE - PRINT QUEUE REBUILD AT "RJE" "BOJ" 

tw ,ph„ild n f RJE's orint queue at BOJ now takes place as an asynchronous process, thus 

SfcsS K.™J&: Jra '.a W1& :a-uB'?.ii: c:;rm;,?:r,r;;U; 

response during the rebuild. 

An *SP request displays an extra line, as follows: 

"(PRINT Q REBUILD IN PROGRESS LIST MAY NOT BE COMPLETE.)" 
An 'BACKUP request is not allowed during the rebuild and displays the following: 

"#NOT ALLOWED WHILE PRINT QUEUE REBUILD IN PROGRESS." 
Any station that requests information during the rebuild is notified of the .rebuild finish by 
the following: 

"#PRINT QUEUE REBUILD FINISHED. " 
D3037 RJE - •BACKUP REQUESTS RUN ASYNCHRONOUSLY 
The 'BACKUP RJE request now causes the procedure GETBACKUPFILENAMES to run ASYNCHRONOUSLY with 
WE. ThVs allows^he otSer Nations in the RJE network to continue working when large numbers 
of REMLP and REMCP files are involved. 

A 'BACKUP RJE request while one is in progress results in the following message: 
"#BACKUP REQUEST ALREADY ACTIVE. " 
D3038 RJE - "MCS" NAME DISPLAY CHANGE 

lisnlaved in response to a •WM, RJE BOJ , station LOGON, i s now the actual name 
lllowing s!?es "5 "S with multiple copies of RJE with different names. 

D3041 RJE - "WORDS" VS. "CHARACTERS" IN FILE TRANSFERS 

ah uAVBB<-Bi'7U . n /i mnrKSIZE values in RJEs PUT/FETCH records are as if the requested file were 
* ' ^CH^CTER^wJen "V"t ,e with ^EQUAI^C WORDS) is r equest ed^f • r trans er, the 

r^ffon^V^frefeivtng host"?^ B SoO^OO^ yfte^and UNITS^^lhe^Ist nat ion 
,rS rurMA^S^anrBLOCKsfzE^djusted back to WORDS. For no n-B 6 000/B7000 destination 
hosts, there is no record type of WORDS; all files remain in CHARACTERS format. 

D3042 RJE - FILE TRANSFER CODE OPTIMIZATION 

The readability of the file transfer code in RJE has been improved. 
D3043 RJE - "BCL" CONSTRUCTS REMOVED 

The use of BCL constructs in the binary punch label translation routine have been replaced by 

HEX constructs. 
D3078 RJE - BLANK "FTS" RECORD AT END OF "FTS" BLOCK 

K.sjr'ij' 5Ji:-'.::r'f.t:.s- .:■•: ms':J..« *..-: .i::rf:'..'iri;,-t::*t..s: 

transmission. 
D3079 RJE - "CHARACTERSPERFTBLOCK" 

RJE „ow u-s CHARACTERSPERFTBLOCK in sizing ^s FJLEX and^ILER inpu^an^output^rrays^ This 

CHlRlcTERSPERFTBLOCK S Ihould b be C the same on°both host systems involved in a file transfer. 
D3080 RJE - CRUNCHING TRANSFERRED FILES 

RJE now only LOCKS with CRUNCH files that are crunched on the source host after being 

t ransf erred . 
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D3081 RJE - "LOCK PROGRAM" 

RJE now protects itself from accidental DSes by performing a LOCK PROGRAM request during 
initialization. This causes any ODT request to DS RJE to respond with "PROGRAM IS LOCKED". To 
cause RJE to go to EOJ , the following command should always be used: "<mix #> SM QUIT". If a 

DS of RJE is necessary, the program can be unlocked by the following command: "<mix #> LP - ". 

D3091 RJE - HOST TO HOST "LOGON" LOOP 

RJE could lock in a LOGON loop between host systems due to incomplete status information 
zeroing at LOGOFF. This problem has been corrected. 

D3092 RJE - "PUT/FETCH" STRING FIELD TERMINATION CHARACTER 

RJE now blank fills the following fields in the file transfer PUT/FETCH records: FILENAME 
PACKNAME, USERCODE, PASSWORD (in both source and destination sections). 

This causes all "string" type items in the record to terminate with a blank unless the item is 
field size in 1 ength. 

D3098 RJE - MISSING "EOF" 

Under some conditions, RJE would fail to record the reception of a "23" control message in the 
SEND word of FTQARRAY. This problem has been corrected. 

D3159 RJE - FILE TRANSFER UNEXPECTED ABORT 

RJE aborts a file transfer when any of the following occur: 

1. Program fault in either FILEX or FILER tasks (SEG ARRAY, INVALID INDEX, etc.). 

2. Operator DS of either FILEX or FILER tasks. 

3. Parity error reading input file in FILEX. 

4. The result of expanding a record because of an invalid character (non-graphic) produces a 
record greater than the FILE TRANSFER BLOCKSIZE. 

All of the above error conditions produce a message to the originator stating the reason for 
the abort. The format of this error message is as follows: 

#FT ABORT % <hostname> - <abort reason) 

where <hostname> is the hostname at the site where the fault, DS, etc., occurred. 

<abort reason> is one of the following: 

1 . OPERATOR DS 

2. PROG FAULT (TYPE=X, CAUSE=Y, REASON=Z) 

Note: X, Y, Z are fields of the HISTORY task attribute. 

3. EXPANDED RECORD > FT BLOCKSIZE 

4. PARITY READING REQUESTED FILE 

D3160 RJE - FORMMESSAGE LINK IN "REMLP" FILES 

RJE now uses the FORMMESSAGE link in BLOCK CHARACTER CONTROL word (word 1) of the REMLP files 
control record to find the formmessage (if there is one). 

D3161 RJE - CODEFILE RECORD TRANSLATION 

RJE now unconditionally translates all records for all code files (19 <filekind <64), thus 
accelerating the transmission in a file transfer. 

D3166 RJE - NOT SENDING "09" CONTROL MESSAGE 

RJE would not send the 09 control message when a new host was logging on. This problem has 
been corrected. 

D3168 RJE - "ONLINE, OFFLINE" BY STATIONNAME 

RJE now allows the use of a stationname in the ONLINE and OFFLINE commands. 

Syntax : 

— <rje mix #>— SM ONLINE <lsn> | 

|- OFFLINE -| I -<s tat ionname>- 
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The <s tat ionnamo must be that of the base (device address 00) station in the RJE family. If 
an invalid lsn or stationname is used, the following error message is displayed: 

# UNKNOWN STATION. 

If no lsn or stationname is supplied, the following error message is displayed: 

# LSN OR STATIONNAME REQUIRED. 

D3219 RJE - RECORDS LARGER THAN FILE TRANSFER BLOCK SIZE 

RJE now allows the transfer of files whose MAXRECSIZEs are greater than FILE TRANSFER 
BLOCKSIZE. This is accomplished by splitting the record across several blocks. 

Note: This feature is only allowed between B6OOO/B7000 systems. 

D3220 RJE - INVALID CHARACTER RECORD TRANSLATION 

The number of INVALID CHARACTERS that cause RJE to translate a file transfer record has been 
reduced to those used by the DCP and its support software, thus reducing the number of records 
that have to be translated and increasing file transfer throughput. 

Note: This feature is only allowed between B6000/B7000 systems. 

D3234 RJE - TERMINAL TRANSFER 

The RJE protocol supports a user at a terminal on one host connecting to an interactive 
applications program on another host, and using the terminal as if it were locally attached to 
the program. This is done by using the File Transfer Link and a set of stations associated 
with it between the two hosts. 

For use in this document, the terms "local" host and "remote" host have the following meanings: 
the "local" host is the system where the user's terminal is physically attached , while the 
"remote" host is the system where the desired application is located. 

Because this feature of RJE requires the use of the File Transfer Link the user should be 
familiar with the RJE commands ONLINE, OFFLINE, FTS and WH and the NDL stations associated with 
it before proceeding with this document. 

The method for conveying terminal data between hosts makes use of the device address field, DAI 

DA2, to specify the terminal with which the data is associated. "DAI, DA2" in this context is 

termed a "virtual station address", and is the name used by local and remote hosts to refer to 

a particular terminal. The addressing scheme is as follows: 

1. DAI and DA2 are ASCII letters, one upper case and the other lower 
case . 

2. If "DAI, DA2" is the transmit address for a particular terminal, 
then "DA2, DAI" is the receive address for that terminal. 

3. When the local host refers to a terminal (by transmit address), 
"DAI" is a lower-case letter and "DA2" is an upper-case letter. 
When the remote host refers to the same terminal, since the roles 
of "transmit" and "receive" are reversed, "DAI" is an upper-case 
letter and "DA2" is a lower-case letter. 

4. If a local host supports <n> different terminals connecting to a 
particular remote host, the local host refers to them by the 
following virtual station addresses (as transmit addresses): 

aA, bA, cA zA, aB, bB, cB 

and the remote host refers to the same terminals by these virtual 
station addresses (also as transmit addresses): 

Aa , Ab , Ac , . . . , Az , Ba , Bb , Be , ... 

The local and remote hosts decide independently how many terminals they will support, so these 
numbers will likely be different. There is an example of the above described stations in the 
SYMBOL/ SOURCENDL under the RJE1 family of stations. The VSIN1RJE1 and VSIN2RJE1 are receiving 
stations (they are used when RJE1 is acting as the remote host), while VSOUT1RJE1 and 
VSOUT2RJE1 are transmitting stations (they are used when RJE1 is acting as the local host). 
The number of stations and their type (input or output) determines the number of terminals that 
can be transferred at any one time. In the example RJE1 family, the host can support two input 
terminals as a remote host and two output terminals as a local host. 

Note that the above described "virtual stations" have a terminal type of VSRJEA for 
asynchronous and VSRJES for synchronous. Due to the inability to assign terminal c asses in the 
NDL, the terminal type is used to distinguish stations within RJE. Any terminal type that 
starts with the letters "RJE" is assumed to be an RJE Terminal with device addresses in the 
range "00" to "04" (RSCs , LINEPRINTERs , etc), while terminal types that to not start KJH are 
assumed to be "virtual stations". This requires any user NDL that does not conform to the 
above to be changed and recompiled. 
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In addition to the "virtual station", there is another class of station needed. The "pseudo 
station" is used by the remote host as a means of transferring the data from RJE' s File 
Transfer Link (input virtual station) to a station controlled by some other MCS (CANDE, APL) . 
The pseudo station has the same characteristics as the virtual station except the device 
addresses are "09", "09". The RJE1 family station has two examples of this type of station. The 
pseudo stations are handled in a pool by RJE, meaning that all the pseudo stations are 
available to any virtual station attached to liJE on the host. Therefore the assignment of the 
pseudo station to a particular line is not required. There should be one pseudo station 
declared and assigned to a line for every input virtual station attached to RJE. 

New or modified commands 



Connect Terminal 



*CT — <hostname>- 



The Connect Terminal causes an attempt to attach the user's terminal to RJE on the remote host 
request by <hostname>. RJE on the local host will respond with one of the following messages: 

#HOST <hostname> DOES NOT SUPPORT THIS FUNCTION. 

The requested host is not Terminal Transfer capable. 

#NOT ALLOWED FOR THIS STATION. 

The station at which the *CT was entered cannot be transferred 
(RJE Terminals with device addresses of "00" to "04"). 

#HOST <hostname> IS NOT CONNECTED TO THIS HOST. 

There is no File Transfer Link (see ONLINE command) to requested 
hos t . 

#HOST <hostname> CANNOT SUPPORT ANOTHER STATION AT THIS TIME. 

All virtual stations (output stations on local host) are in use. 
#STATION ALREADY CONNECTED TO <hostname>. 

An attempt to transfer a station already transferred. 

If the local host accepts the request it is forwarded to the remote host for its checks. The 
following are the remote hosts responses: 

#UNABLE TO TRANSFER TERMINAL BECAUSE OF INVALID ADDRESS OR SYSTEM FULL 

The remote host cannot accept another station or the virtual 
station address is not validd. 

#UNABLE TO TRANSFER TERMINAL NO MCS READING ON STATION. 

This message can only be received from a B1800 or B800 host. 

#UNABLE TO TRANSFER TERMINAL STATION INUSE. 

The virtual station address is already in use on the remote 
hos t . 

fUNABLE TO TRANSFER TERMINAL FOR REPLY VALUE = xx. 

A reply to the *CT request of unknown value, where xx is the 
value. 

If the *CT request is accepted by the remote host the following message is displayed: 
#SUCCESSFUL TERMINAL TRANSFER TO HOST <hostname>. 



Disconnect Terminal 
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*DT 



The Disconnect Terminal command will unconditionally disconnect the station from a remote host. 
This message is the only message to which the local RJE will respond without forwarding it as 
text to the remote RJE. The following are the responses to the *DT request: 

#INVALID REQUEST - TERMINAL IS NOT TRANSFERRED. 

The *DT command was entered at a station that was not transferred 
to a remot e host . 

^TERMINAL TRANSFER TO HOST <hostname> HAS BEEN TERMINATED. 

Successful termination of the terminal transfer. 



Re 1 ease 



- *RE <mcs name>- 

I — < 1 sn>- | |- TO -| 

Ex amp 1 es : 



•RE 39 SYSTEM/ APL 
*RE SYSTEM/CANDE 

This command causes the station indicated by the optional <lsn>, or if no <lsn> is specified, 
the station at which the request is entered to be released (detached and attached) to the 
indicated MCS . If the <lsn> does not belong to one of the stations of the terminal at which 
the key in was entered, RJE will respond with the following : 

# INVALID LSN 

If the requested <mcs name> is not declared in the host NDL, RJE will respond with the 
fol lowing : 

# INVALID MCS 

If, through the use of the *CT <hostname> command, the terminal has been transferred to a 
remote RJE, only the non-lsn version of the request is allowed. Use of an <lsn> will cause the 
following message: 

#LSN NOT ALLOWED 

If the remote RJE cannot complete the release because of insufficient pseudo stations, RJE will 
respond with the following: 

#NO PSEUDO STATION AVAILABLE. 



New SM commands 



Vi r tual Stat ions 



— <rje mix #> — SM — VS 

-<lsn>- 
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The Virtual Station command will display the status of all the virtue! station associated with 
RJE. The optional <lsn> will restrict the display to only the virtual station associated with 
that station. The following is an example of the display: 

[084] RJEXXX 6 SYS 1073 (3 TOTAL, 1 INUSE STATIONS) 

[089] INPUT STATION NOT CONNECTED 

[090] INPUT STATION NOT CONNECTED 

[091] OUTPUT STATION CONNECTION ATTEMPT IN PROGRESS 
[124] RJE1 6 B68001244 (2 TOTAL, 1 INUSE STATIONS) 

[130] INPUT STATION NOT CONNECTED 

[131] OUTPUT STATION CONNECTED TO TD426361 [199] 
[153] RJE2 NO HOSTNAME (1 TOTAL, INUSE STATIONS) 

[160] INPUT STATION NOT CONNECTED 

In the above example, all the numbers in brackets ([]) are LSNs . The identifiers RJEXXX, RJE1 
and RJE2 are station names of ihe device address "00" stations in control of a File Transfer 
Link. The identifiers SYS1073, B68001244 are the host names of the systems to which the File 
Transfer Links are connected. The remainder of the lines are the virtual stations with their 
status (CONNECTED or NOT CONNECTED) and type (INPUT or OUTPUT). LSN 91 is processing a *CT 
request and has not yet received a reply from remote host SYS1073. LSN 131, which is an output 
station, is currently being used by a station called "TD426361" at LSN 199. LSN 153 station 
RJE2 is currently not connected to any remote host indicated by "NO HOSTNAME". 

Non-RJE Terminal Communication With RJE 



A non-RJE terminal is a terminal whose NDL Terminal type identifier does not start with the 
letters "RJE"; e.g., TD800s and TELETYPES. These terminals have usually been released to RJE 
from some other MCS and do not belong to an RJE family of stations (PROCESSOR, RSC, CARDREADER, 
LINEPRINTER, ITS). To control these new terminals several changes have been made to RJE. Two 
new defines have been added to the "MAXTERMINALS" define to allow specification of the mix of 
RJE to non-RJE terminals. "MAXNONRJETERMINALS" specifies the maximum number of this type of 
terminals allowed at any one time, while "MAXRJETERMINALS" specifies the maximum for the 
standard RJE type terminals. The define "MAXTERMINALS" is the total of "MAXRJETERMINALS" and 
"MAXNONRJETERMINALS" . 

Once a non-RJE terminal has been released to RJE, any Log-on and or Stationid checks that are 
required by RJE will be performed. After a successful Log-on, the terminal will respond just 
like a RSC at any RJE terminal with all the same restrictions placed on it by 
SYSTEM/SCTABLEGEN. All of RJE' s "*" commands are valid and access to WFL through CONTROLCARD 
is allowed. To return the terminal to its original MCS, the *RE or BYE command is required. 

A new "*" command has been created for use by these non-RJE terminals which allows RJE ODT 
capablities. The command syntax is as follows: 

— *SM — <any RJE ODT SM command> — I 



Examples : 

•SM WH 

*SM COPY A (USER=X/Y) FROM DISK (HOST=SYSl) TO FRED (HOST=SYS2) 

•SM TF 

The *SM command allows the terminal users the ability to enter any of RJE's ODT SM commands. 
The use of this command is controlled by the setting of the NDL' s SPO station bit. If the users 
station is not SPO = TRUE then the following error message is displayed: 

#NOT ALLOWED. 



Sample RJE Terminal Transfer Session 



The following is a sample of what a Terminal Transfer might look like between two B6800 
sy s t ems . 



SYS1 Stations 

RJE1 (device address "00") 
RJE1RSC ("01") 
RJE1CR ("02") 
RJE1LP ("03") 



SYS2 Stations 

RJE2 (device address "00") 
RJE2RSC ("01") 
RJE2CR ("02") 
RJE2LP ("03") 
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RJE1FTS ("04") 
VSOUT1 ("Aa","aA") 



TD8 3XX 



("XX") LSN 296 
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RJE2FTS ("04") 
VSIN2 ("aA","Aa") 
PSEUD02 ("09", "09") 



LSN 19 



The above stations form the Datacom Network on two systems with the HOSTNAMEs of SYS1 and SYS2 . 
All the stations on SYS2 are assigned to a single line and form an RJE family. The TD83XX 
station on SYS1 is a TD830 terminal attached to SYSTEM/CANDE, while remainder of the stations 
form an RJE family. 

It is assumed that the two hosts are connected via the File Transfer Link between RJE1FTS on 
SYS1 and RJE2FTS on SYS2. The user at station TD83XX wishes to use SYSTEM/CANDE on host SYS2 
and enters the following: 

?MCS SYSTEM/RJE 



the fol lowing 



This causes CANDE to release control of the station to SYSTEM/RJE, which causes 
output : 

#END SESSION 4567 ET=2 : 13:49 PT=0 : IO=0:0 
#USER = MIKE 11:40:31 04/28/80 
296: RELEASE COMPLETED 

The #END SESSION and #USER messages are CANDE' s while the third response is from RJE showing 
that the release was successful. RJE now controls TD83XX and any input at the terminal is now 
responded to by RJE. It is recommended that the RJE input "HELLO" be used at 
activate the station. RJE will then respond with the following: 

B6800 SYSTEM/RJE SYSTEM #456 HOSTNAME = SYS1 32.82.48 MIX = 6019. 



this point to 



At this point RJE will either ask for a USERCODE and PASSWORD or assign a SESSION, depending 
upon the setting of LOGON. For this example, assume LOGON is not set causing the following: 

TD83XX LOGGED ON AT 11:41:02 04/28/80. 
SESSION 6282. 

The terminal user may now use any RJE command ("*") or CONTROLLER request he chooses. The 
following are example of the types of commands and their responses: 



WT 



TIME IS 11 :50:23 



*TF 

#BLKSZ = 400 BUFFSZ = 820 FTBLK = 1500 

♦BACKUP 

#NO BACKUP FILES. 
#END BACKUP REQUEST. 



— NO ACTIVE ENTRIES 



If TD83XX has the NDL SPO bit set the *SM command is also valid for use. 

*SM WH 

084:ACTIVE RJE1 6 SYS2 (6800) (TTP.FTS , HOST, VER=2) 

*SM FTS 

[084] RJE1 % SYS2 NO ACTIVE FILE TRANSFER 

Now that the terminal is released to RJE on SYS1 the connection to SYS2 is made by use of the 
*CT <hostname> command. 

•CT SYS 2 

If the transfer is sucessful RJE on host SYS 1 will respond with the following: 
♦SUCCESSFUL TERMINAL TRANSFER TO HOST SYS2. 

What has now taken place is that RJE on SYS1 has associated TD83XX with the virtual station 
VSOUT1 and is transferring all input and output between them, while RJE on host SYS2 is now 
reading and writing to station VSIN2. At this point, the terminal user can use any of RJE s or 
the CONTROLLER'S commands that are allowed on the remote host SYS2. 
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For the terminal user to now use SYSTEM/CANDE (or any other MCS) or: the remote host SVS2, the 
*RE command is used as in the following: 

•RE SYSTEM/CANDE 

If the release to CANDE is sucessful, the following will be displayed: 

19: RELEASE COMPLETED 

#B6800 :678 CANDE 32.58; YOU ARE PSEUD02(19) 

#ENTER USERCODE PLEASE 

At this point, the terminal user is attached to SYSTEM/CANDE on the remote host SYS2. On SYS2 
the virtual station VSIN2 is now associated with the pseudo station PSEUD02 which has been 
released to CANDE. For the life of the connection, all input from the terminal will go to 
CANDE on SYS2 while all output from CANDE will go to the users terminal on SYS 1 . 

When the user is finished with CANDE on SYS2, he needs to cause the pseudo station to be 

released back to RJE. This can be done by entering to CANDE "?MCS SYSTEM/RJE" . At this point, 

the user is again connected to RJE on SYS2; to break this connection, he enters the *DT command 
which will result in the following: 

♦TERMINAL TRANSFER TO HOST SYS2 HAS BEEN TERMINATED 

The user is now talking to RJE on the local host SYS1 and a "BYE" will return him to 
SYSTEM/CANDE. 

Halt Load Effects 



If the remote host should Halt/Load during the life of the connection of a terminal, the 
association between the remote virtual and pseudo stations is lost and any tasks using the 
stations are DSed. The user should use the *DT command to free his terminal from the local 
virtual station to be able to communicate with the local RJE. Once the remote host is back up 
and the File Transfer Link is active, the terminal can be re-transferred. 

If the local host should Halt/Load, the user's terminal is released back to its original MCS by 
the reinitializing DCP. At this point, the remote pseudo station is still released to whatever 
MCS last owned it and will remain so until manually released back to RJE by that MCS or when 
the remote host next Halt/Loads. Until the pseudo station is released back to RJE, it is not 
available to any virtual station. 

MCP 

Several changes have been made to the MCP to support RJE' s Terminal Transfer. 

Room was needed in the STATION TABLE for an additional MCS number (PSEUDOMCSNRF) of 6 bits. 
The PRIMARY, CURRENT, and STATION Queue number fields were reduced by 1 bit each and combined 
with 3 available bits to form the field. 

The "TRANSFER STATION CONTROL" (TYPE=45) DCWRITE has been modified to allow the transfer of a 
station from one MCS (e.g., RJE) to anrther (e.g., CANDE) yet still maintain partial control of 
the transferred station. This variant of DCWRITE 45 is invoked by setting bit 26 in word of 
the message. The MCS number of the MCS making the request will be stored in word 2 of the 
STATION TABLE at PSEUDOMCSNRF ([4!:6]) while the MCS number of the MCS being transferred to 
will be stored in word at STAMCSNRF ([37:8]). If, after a station has been transferred with 
the above variant set, it is transferred again by the new controlling MCS, the PSEUDOMCSNRF 
field will still contain the original controlling MCS number. This allows the user to transfer 
the terminal from remote MCS to remote MCS without going back to the original controlling 
remote MCS (RJE) each time. When the transfer is back to the original controlling MCS, the 
PSEUDOMCSNRF is returned to its initial value of zero. 

A new "WRITE TO TRANSFERRED STATION" (TYPE=53) DCWRITE has been created to allow the 
controlling MCS the ablity to direct messages from its stations to their corresponding 
transferred stations now controlled by another MCS. There are three variants of DCWRITE 53: 

0: A GOOD RESULT message is to be forwarded to the MCS 
(STAMCSNRF) in control of the requested LSN. 

1: A STATION EVENT message is to be forwarded to the MCS 
(STAMCSNRF) in control of the requested LSN. 

2: The result of some write from the transferred station is 

to be returned to either the controlling MCS or to Logical 
I/O by a call on DCIOFINISH. 
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In variants and 1, the message is forwarded with only the MSG[0] word modified to reflect a 
Message Class of either GOOD RESULT or STATION EVENT, a VARIANT of 0, and the requested LSN in 
MSGUNITF. 

In variant 2, the message to be forwarded is in the text portion of the type 53 message and is 
6 words in length. It is the result of R.FE successfully placing a message onto the File 
Transfer Link to the local host. This result will be returned to either Logical I/O if the 
original message type was of type OBJECTJOBOUTPUT (output of Logical I/O) or to the MCS now in 
control of the transferred station. If the MCS does not want results through the setting of 
the variant of the "STATION ATTACH" DCWRITE, the message will be discarded 

For stations that have been transferred and are doing Logical I/O, special FILE OPEN and FILE 
CLOSE messages are generated and sent to the MCS pointed to by PSEUDOMCSNRF . The layout of 
these messages are as follows: 

Word [0]. [23:24] LSN of transferred station 

[26:01] 1 Flag for audit and debugging use 
[47:08] FILEOPENMSG or FILECLOSEMSG type 

[2]. [39:16] 3 text size 

[6] . [23:24] FRSN of lsn 

To allow RJE Terminal Transfer to work without modifying any other MCS, the MCP will intercept 
all messages of type WRITEREQ from stations that have been transferred (indicated by the fact 
that PSEUDOMCSNSF is non-zero) by use of the above described DCWRITE 45. These messages are 
than directed at the MCS pointed to by PSEUDOMCSNRF with a "TRANSFERRED INPUT RESULT" 
(CLASS=29) MESSAGE and the MSGUNITF field changed to LSN from DLS . 

DCSTATUS and DUMPANALYZER 



The defines for Primary, Current and Station Queues have been changed to match the new defines 
in the MCP. Also the new field PSEUDOMCSNRF of the STATION TABLES (word 2) has been added. 

The display of PSEUDOMCSNR has been added to the STATION TABLE display of the DUMPANALYZER 
option DCPANALYSIS and the DCSTATUS display of a station. 

SOURCENDL 



The SOURCENDL has been modified with the addition of several new terminal types and some 
example stations. The new terminals are used by RJE for File Transfer and Terminal Transfer. 
They consist of RJEAFTS and RJESFTS which are asynchronous and synchronous terminals which 
allow RJE to transfer blocks of up to 2000 characters without the need of defining excessive 
message space for the other stations needed on the line. There are also four new stations 
attached to RJE1 which are to be used as examples of Virtual and Pseudo stations. 

D3247 RJE - PHONE NUMBERS 

RJE will now allow alphanumeric phone numbers of up to 71 characters in length. This change 
has caused a modification of the LINKFILE and a change to LINKFILEVERSION, making it 
incompatible with previous versions. 

For phone number strings greater than 71 characters, the following error message is displayed: 

"# PHONE NUMBER OTR 71 CHARACTERS" 

D3255 RJE - FILE TRANSFER 

The File Transfer facility has been enhanced for the Mark 32 system release. PCN marks in the 
right margin in the following system note indicate changes since the Mark 31 implementation. 

The implementation requirements of the following new features have caused an increase in the 
number of "system control messages" (device address 00 messages) plus format changes to some of 
the old messages. The use of these new "system control messages" may cause compatibility 
problems with old or non-Burroughs RJE terminals and Mark 32 SYSTEM/RJE. 

SYSTEM/RJE has been modified to allow files to be transferred between host systems and between 
host systems and terminals. The file transfer is done through a new station added to a site's 
NDL for each RJE station family. This new station has a device address of 04 but no other 
special attributes. An example of this new station can be found in the SYMBOL/ SOURCENDL file 
for this software release. 

Since this new feature is symmetric, it may be invoked between any two systems without regard 
to "HOST" vs. "TERMINAL" status; thus, the term "HOST" will be used in the remainder of this 
document. There are two classes of connection between hosts, "peer" and "non-peer". A peer host 
is a system of the same software type; e.g., B6700, B6800, B7700 are peers while a B1800 
connected to a B6800 would be a non-peer. For the remainder of this document a peer host will 
mean two "Large System" hosts. 
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File transfer is supported for disk and pack files with the following restrictions: 

1. Only code and 8-bit data files (including text files) may be transferred. 

2. Only one file at a time may be transferred in each direction. 

3. File titles cannot be greater than 100 characters in length. 

4. The following restriction applies only to non-peer connections. To support code file 
transfers (and in some case data files) RJE must scan every record looking for characters 
that are outside of its "valid character" set. Upon finding a record with an offending 
character the whole record is translated into a new form which is comprised of only valid 
characters but twice the original length. If this new record length or the original record 
length (maxrecsize) are larger than the allowed File Transfer Blocksize the transfer will be 
terminated. 

The user initiates a file transfer by entering a variation of a WFL "COPY" statement on the 
host ODT. This command specifies source and destination hosts and file titles. The hosts are 
specified by the use of their "HOSTNAME"; in the case of a "LARGE SYSTEM" host (B6700, B6800, 
B7700, etc.), this hostname is created in the following fashion: 

If the "HN" (HOSTNAME) ODT command has not been used, then SYSTEM/RJE creates a hostname 
at run time. This hostname is the letter "B" followed by the 4 digit system model 
number (6700, 6800, etc.) and then the 3 or 4 digit system serial number. For sites 
that have specified a hostname by the "HN" ODT command, that hostname is used. Note 
that if two sites are connected to a host with the same hostname, requests to transfer 
files may not produce the desired results. 

The actual transfer of a file is initiated by the exchange of control information between the 
hosts. If the specified source host is the user's local host, the transfer is a "PUT"; if the 
source host is the remote host, then the transfer is a "FETCH". This means that if the file to 
be transferred from my host to your host is on my host, the "COPY" request will generate a 
"PUT" control message; if the file is on your host, it will generate a "FETCH" control message. 
All file transfers occur as "PUTS"; if one host wishes to do a "FETCH", it sends a "FETCH" 
message to the other host which causes it to initiate a "PUT" sequence. The "PUT" message 
elicits a "PUT REPLY" which signals that data transfer may begin or supplies a reason for the 
rejection of the "PUT" request. If the transfer is OKed, the sending host then sends one or 
more data messages to device address 04 followed by an end-of-file message. The sending host 
processes a task called "FILEX[< I sn>] " , where <lsn> is the LSN of the station connected to the 
remote host. This task runs independently of SYSTEM/RJE. It opens the requested source file 
and performs any data compaction or translation required in the course of the transfer. The 
receiving host processes a task called "FILER[ < 1 sn>] " which also runs independently of 
SYSTEM/RJE. This task reverses whatever FILEX did to the data and creates the requested 
destination file. Upon completion of the file transfer, the receiving host informs the 
requestor of completion of the request. 

Any file transfer requests that occur while another transfer is in progress are queued and then 
executed when possible. When a request is queued, the following message is displayed: 

#FILE TRANSFER STATION IN USE - COPY REQUEST WILL BE QUEUED. 

All requests are queued as "PUTS" , so if a user requests a "COPY" that results in a "FETCH" 
being generated, the request is sent to the other host and may be queued for the reason given 
above. If the "COPY" request is syntactically correct and passes resident and security checks, 
the following message is displayed: 

#COPY REQUEST VALID - WILL FORWARD. 

The other host responds either with an error display or a request accepted display, in which 
case the transfer will start. 

All files from non-peer hosts will be locked as type data, while files from peers will be 
locked with as many of the original file's attributes as possible (including FILEKIND) . 

To implement this new feature, a set of new commands has been added to SYSTEM/RJE and several 
old commands have been modified. The file transfer requests and their progress displays are 
made on the host ODT by using SYSTEM/RJE "SM" message syntax. 

New SYSTEM/RJE SM Commands 



The syntax checking of the COPY command has been modified to allow requests to non-B6000/B7000 
systems (via SYCOM) . RJE syntax checks only the part of the request involving its host; the 
remainder of the request is forwarded as supplied by the user. 

Syntax : 
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COPY 

— COPY — <filename>- 



|-<usercode spec>- 



- AS <filename> 

- ONTO -| |-<usercode spec>- 
>- TO — <volutne speo 



BINARY -I 
- FROM — <volume speo > 



<usercode speo 

— ( — USER = — <usercode>- 



- , — PASSWORD = — <password>- 

- / — <password> 



<volume spec> 



- disk; 

- PACK 

-<volume name>- 



KIND 



- TAPE 

- TAPE7 — 

- TAPE9 — 

- PETAPE - 

- DISK 

- PACK 



HOST = > 



>-<hostname> — ) 



Semant i cs : 

The "COPY" command transfers the requested file from the source HOST to the destination HOST. 
The <usercode speo is used to verify access rights to the specified file and to the use of the 
file transfer station. It may also affect defaults for parts of the file title. For file names 
that start with the characters "*" or "(*, the <usercode speo usercode is not used as a 
prefix. The <usercode speo is required for any source or destination that is a B6000/B7000 
system HOST. The default volume kind is "PACK". The <volume name> may be omitted from either 
the source or destination parts of the request for non-B6000/B7000 systems; the affected HOST 
does whatever defaulting is required for that system. The "COPY" request does not overwrite an 
existing file on the destination HOST unless the "ONTO" modifier is used. 

The "BINARY" option causes RJE to transmit the requested data (noncode) file in an encoded 
fashion. This is required in some cases when the requested transfer is between ASCII (B800) 
and EBCDIC (B1800, B6000/B7000) hosts due to differences in allowable characters. In transfers 
of data files between ASCII and EBCDIC hosts where the "BINARY" option is not used, all 
non-graphic characters are replaced by a graphic question mark. The "BINARY" option has no 
effect on the transfer of code files as they are always encoded between ASCII and EBCDIC hosts. 

Exampl es : 

<RJE MIX#> SM COPY TESTFILE (USER=MIKE) FROM MCPMAST (HOST=B6700282) 
TO DISK (HOST=B68001004) 

Transfers " (MIKE)TESTFILE" from a pack called "MCPMAST" on HOST "B6700282" to 
named "DISK" on HOST "B68001004". Usercode "MIKE" (with no password) must b 
usercode on both hosts. 

<RJE MIX#> SM COPY TESTFILE (USER=MIKE) AS X (USER=RJE/RJE) FROM 
MCPMAST (HOST=B6700282) TO DISK (HOST=B680010O4) 

Same as the first example except the destination file title i s " (RJE)X ON DISK" . 
Usercode "MIKE" is used for all security and resident checks on HOST B6700282 while 
"RJE/RJE" is used on HOST "B68001004". 

<RJE MIX#> SM COPY *WFL (USER=MIKE) ONTO TEMP (USER=WHY, PASSWORD=ME) 
FROM DISK (HOST=B6700282) TO PACK (HOST=B7700003) 



a pack 
e a valid 
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Transfers the system file "*WFL" from DISK on HOST "B6700282" as a file called 
"(WHY)TEMP ON PACK" (RJE overwrites the file if it already exists) on HOST "B7700003". 

<RJE MIX#> SM COPY *WFL (USER=MIKE) FROM MCPMAST (HOST=B6700282) 
TO (HOST=B1800XX) 

Transfers the system file "*WFL" from MCPMAST on HOST "B6700282" to a B1800 system with 
the hostname of "B1800XX". The B1800 uses whatever defaults it has defined for 
destination family. 

<RJE MIX#> SM COPY *WFL (USER=MIKE) FROM MCPMAST (HOST=B6700282) 
TO (HOST=B6800135) 

<RJE MIX#> SM COPY *WFL (USER=MIKE) FROM (HOST=B6700282) 
TO PACK (HOST=B6800135) 

The two examples above both cause syntax errors because of missing volume names (both 
hosts are B6000/B7000 systems). 

The following are error messages that are produced as a result of an invalid "COPY" command: 

FILENAME GTR 100 CHAR. 

INVALID FILENAME: <filename>. 

NO FROM OR TO PARTS. 

NO FROM PART. 

INVALID VOLUME NAME: <volume name>. 

MISSING VOLUME NAME. 

VOLUME NAME AND KIND MISMATCH. 

Example: Setting "KIND=DISK" when <volume name> is "DISK". 

MISSING EQUAL. 

Equal signs are required after key words: 
"USER", "PAS SWORD", "HOST", "KIND" 

INVALID MEDIA TYPE: <media type>. 

NO HOSTNAME. 

EXPECTING PARENTHESIS. 

NO TO PART. 

NO USERCODE/PASSWORD. 

INVALID USER/PASS SYNTAX. 

SOURCE AND DEST HOSTNAMES THE SAME. 

THIS HOST NOT SOURCE OR DEST. 

USERDATAFILE FROZEN - TRY LATER. 

The USERDATAFILE was not available at security 
check time. 

SECURITY ERROR ON USER = <usercode>. 

FILE <filename> NOT AVAILABLE. 

FILE <filename> NOT RESIDENT. 

FILE <filename> ALREADY EXISTS. 

FILE <filename> IS OPEN EXCLUSIVE AND CANNOT BE REPLACED. 

FAMILY <fami lyname> IS NOT PRESENT. 
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ABORT 

— ABORT — <lsn> SEND 

- RECV 



-< int egcr> — 
-< f i 1 ename>- 



The ABORT command is used to stop an active file transfer or delete one or all entries that are 
queued for a host. The key words "SEND" and "RECV" are used to specify the type of transfer to 
abort. The <lsn> is the LSN of the station to which the remote host is connected. See the 
"FTS" command for more information concerning the <integer> and <filename> formats and 



meant ngs . 

Ex amp 1 es : 

<rje mix#> SM ABORT <lsn> SEND 

Aborts the current active "FILEX" task (the sender). 

<rje mix#> SM ABORT <lsn> RECV 

Aborts the current active "FILER" task (the receiver). 

<rje mix#> SM ABORT <lsn> SEND = 

Deletes all requests queued at this host for the requested <lsn>. 

<rje mix#> SM ABORT <lsn> RECV = 

Deletes all requests queued at the remote host for transmission to the requested <lsn>. 

<rje mix#> SM ABORT <lsn> SEND <integer> 

Deletes the <integer> entry from the queued list but does not delete the active entry 
(queued number 0). 

<rje mix#> SM ABORT <lsn> RECV <integer> 

Deletes the <integer> entry from the queued list of the remote host connected to the 
requested <lsn>, but does not delete active entry (queued number 0). 

<rje mix#> SM ABORT <lsn> SEND <filename> 

Deletes the first queued entry from the queued list for the <lsn> requested where the 
queued source filename matches <filename>. 

<rje mix#> SM ABORT <lsn> RECV <filename> 

Deletes the first queued entry from the queued list of the host that is using the <lsn> 
where the queued source filename matches <filename>. 

ONLINE 

— ONLINE <lsn> | 

I -<s tat ionname>- | 

The ONLINE command initiates the connection between two hosts. Depending on the type of 
datacom connection, this command has different effects. 

SWITCHED LINE WITHOUT AUTOMATIC CALLING UNIT 

The request has no effect and elicits a response of : 

#NON DIAIOUT CAPABLE STATION. 
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SWITCHED LINE WITH AUTOMATIC CALLING UNIT 

Causes dialout if phone number is set up (see PH command) 
RJE will respond with either : 

#NO DIALOUT PHONE NUMBER 

or 
fDIALING OUT STARTED 
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DIRECT OR LEASED LINE 

Causes the 09 station-id messages to be sent. 
RJE will respond with : 

#OK 



If the <lsn> is already connected and active RJE displays: 

#STATION ALREADY ACTIVE. 
OFFLINE 

— OFFLINE <lsn> | 

I -<s ta t ionname>- - EOJ - 



The OFFLINE command causes termination of the dut acorn connection between two host systems. 
Depending on the type of datacom connection, this command has different effects. 

SWITCHED LINE - causes log-off and line disconnect. 

DIRECT OR LEASED LINE - causes log-off, but leaves line active. 

The EOJ modifier to the OFFLINE command causes RJE to complete its current file transfer (if 
one is active) and then terminate the session. 

RJE responds with the following message to the OFFLINE command: 

#OK. 



PH (Phone Number) 
— PH — <lsn> 

- CLEAR 

-<phone number>- 

- INT 



<phone number> 

— Maximum of 71 characters | 

The PH (phone number) command is used to display, clear, change or retry the automatic calling 
unit phone number associated with a station. 

- Ex amp 1 es : 

<rje mix#> SM PH <lsn> 

Displays the current phone number (if any). 

<rje aiix#> SM PH <lsn> CLEAR 

Clears the phone number. 

<rje mix#> SM PH <lsn> <phone number> 
Enters new phone number. 
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<rje mix#> SM PH <lsn> INT 



Causes dialout retry if the callback option is set 
for < 1 sn> s tat ion . 



SF (Set Factors) 

I < 

— SF — <lsn> T - BLKSZ 

BUFSZ 
FTBLK 



-< int eger> 



This command specifies the characters per transmission blocking factor (BLKSZ), buffer size in 
characters of remote printer and or punch output (BUFSZ) and the maximum number of characters 
allowed in a file transfer block (FTBLK). The following defaults and limits are imposed : 





D 


: f aul t 


BLKSZ 




400 


BUFSZ 




820 


FTBLK 




400 



Limi t s 
132 through 1500 (inclusive) 
132 through 2000 (inclusive) 
400 through 2000 (inclusive) 



Changing any of these values should be done with the utmost care to avoid exceeding the limits 
of the remote terminal or of the datacom line. 

TF (Type Factors) 

— TF — I 



This command has been modified to display the characters per transmission blocking factor 
(BLKSZ), buffer size in characters of remote printer and or punch output (BUFSZ) and the 
maximum number of characters allowed in a file transfer block (FTBLK). The defaults and limits 
imposed are the same as for the SF command. 



— FTS 



-<lsn>- 



LOCKQ 

UNLOCKQ - 



The FTS command monitors the file transfer activity. This command without the optional <lsn> 
displays one or three lines for each active station attached to SYSTEM/RJE. If the station has 
no "HOSTNAME", or if there are no file transfers active 



on 



„.„^».,™„~ «. .. ...... .... ... ...» ... the station, one line will be 

dTspYayed™"show!ng LSN~ "station name, hostname (if any) and a comment of "NO ACTIVE FILE 
TRANSFER". For stations with an active file transfer, three lines are displayed showing the 
status of the station and of the active file transfers. 

If the optional <lsn> is used with the FTS command, only the information for that station is 
displayed. In this case, the display is either one or four or more lines depending on the 
number of queued requests. 

The use of the modifiers "LOCKQ" and "UNLOCKQ" cause RJE to stop and start the file transfer 
send queue for the selected station. Once the queue is locked, RJE continues to queue new 
entries. The queue is also locked by use of the EOJ modifier of the OFFLINE command. 

Example output s : 

The examples that follow are the results of using the FTS command 
without the optional <lsn>. 

[034] RJE1 8 B6800282 NO ACTIVE FILE TRANSFER 
[0391 RJETIO NO HOSTNAME NO ACTIVE FILE TRANSFER 
[044] RJEGMM % B670O282 2 REQUEST QUEUED 

RECV: FILER ACTIVE (4321) 21 OF 54 

SEND: FILEX ACTIVE (4401) 1053 OF 10049 (PACING) 
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The first line of the above example has the following meanings: 

[034] = The base LSN of the RJE station 

RJE1 = Station name 

B6800282 = Remote host name that is connected to this station 

In the second line of the above example the host or terminal using station RJETIO has 
not sent its host name (if it has one) and no file transfers are allowed. 

In lines three through five of the above example, the host B6700282 is active on station 
RJEGMM and there is a file transfer running in each direction. The "RECV" line shows 
the status of the receiving task FILER. The number in parentheses is the mix number of 
FILER while the XXX OF YYY numbers are the current count of records transferred of the 
total for the file. The "SEND" line shows the status of the sending task FILEX. The 
number in parentheses is the mix number of FILEX while the XXX OF YYY numbers are the 
current count of records transferred of the total for the file. The word "PACING" 
indicates that FILEX is waiting for a pacing flag before continuing with the next file 
transfer block of records. 

The example that follows is of LSN 44 in the last example 
using the optional <lsn>. 

[044] RJEGMM 6 B6700282 2 REQUEST QUEUED 
RECV: FILER ACTIVE (4321) 21 OF 54 
<00> (MIKE)TESTFILE ON TESTPACK 

AS (MIKE)NEW/TESTFILE ON MCPMAST. 
SEND: FILEX ACTIVE (4401) 1053 OF 10046 (PACING) 
<00> (MIKE)RJEX ON MCPMAST. 
<01> "SYMBOL/WFL 

AS (MIKE)WFL ON TESTPACK. 
<02> (RJE)DUMMY ON PACK 

ONTO ( M I KE ) S AVE/TH I S /F I LE/FOREVER . 



The lines that start with the items [044], RECV: and SEND: have the same meanings as 
above. The lines that start with <00> are the file names of the active file transfers 
and the counts displayed in the recv and send lines refer to them. The lines under the 
send line that start with <01> through <02> are requests that have been queued. The 
numbers displayed within the <> and the file names on those lines are the numbers and 
file names used in the "ABORT" command described above. 



*SF and *TF 

The RSC keyin commands *SF and *TF have been changed to reflect the addition of the new factor 
"FTBLK" . The syntax of these commands is the same as their SM command counterparts. 

File Transfer Recovery 

If during a file transfer, one or both of the hosts stops (Halt/Load, RJE fault, DCP death, 
etc.), SYSTEM/RJE stores enough information about the transfer to restart it where it left off. 
This is done by storing the current record counts and the "COPY" requests in RJE's "LINKFILE" . 

On the receiving host, the destination file is not created directly but a temporary file is 
created to allow restart and recovery. This temporary file is called "FILERFILEJ < 1 sn> ] " and is 
created under the destination usercode, unless it is a system file (*), on the destination 
<vol umenamo . Upon successful completion of the transfer, the temporary file is re-titled and 
locked. 

At initialization RJE checks to see if it was involved in a file transfer that was not 
completed. The requirements to continue a file transfer are the following: 

1. Connection is made to the same host on the same station (datacom line) that was 
last using it. 

2. The linkfile on both hosts are still intact (do not remove the linkfile). 

3. The temporary output file on the receiving host is available. 

If the above conditions exist, then at initialization the receiving host requests the file 
transfer to continue. The "SEND" and "RECV" lines of the "FTS" command display have the word 
"RESTARTED" in parenthenses for any file transfer that has been continued. 
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If the re-connection of the datacom line is to a different host, all queued request and the 
active requests are deleted and all restart information is discarded. 

Link file Restructure 



Several changes have been made to SYSTEM/RJE to support the file transfer f eature . One °| 
these is the restructuring of the linkfile. To ensure the correct linkfile format, SYSTEM/RJE 
checks at initialization the "LINKFILE VERSION" which is stored in word 56 of record 0. If the 
version of SYSTEM/RJE and its linkfile do not agree, the linkfile will be discarded. There are 
currently four reasons for discarding an old linkfile : 

1. NDL file (DCPCODE and NIF) changes. 

2. Maxterminals in SYSTEM/RJE has changed. 

3. Linkfile version not correct. 

4. Parity error reading old file. 

Each of these conditions causes SYSTEM/RJE to display an appropriate message. 
1)3286 RJE - "WH" DISPLAY ENHANCEMENT 

The RJE command WH will now display the protocol Level and version for stations which supply 
the correct 09 control message. The abbreviations used and their meanings aire the following: 

TTP The station is capable of supporting terminal-to-program connections. 

FTS The station is file transfer capable. 

TERM The station is acting as a terminal. 

HOST The station is acting as a host. 

VER=<n> 

The protocol version number. 

1)3287 RJE - "SM" COMMAND "LEVELS" 

A new RJE SM command has been implemented: LEVELS. 

Syntax: 

— <rje mix #>— SM — LEVELS — | 

The use of LEVELS allows display of the following: 

RJEPROTOCOLVERSION The version of file transfer and terminal-to-program protocols. 

SYMBOL I CHEADERLEVEL The level of the symbolic header used in a file transfer. 

LINKFILEVERSION The version of RJE Halt/Load recovery LINKFILE. 

103346 RJE - "RJE" VS. "DLBACKUP" 

RJE will now search "DISK", "PACK" and the "DLBACKUP" for REMLP and REMCP files. The location 
of the "DLBACKUP" is tested for only at RJE BOJ and used only if it points to a family other 
than "DISK" or "PACK". If "DLBACKUP" is changed to a family other than "DISK" or "PACK" with 




printed will not be found by RJE. 

D3392 RJE - FILE STARTING WITH "?" LOST BLOCK 

RJE will now successfully transfer files whose first record starts with the character "?". The 
"?", because it is RJE' s NDL control character, previously caused a STATION EVENT message 
instead of a GOOD INPUT message. 

D3423 RJE - "DEBUG" VS "RAID" 

The RJE dollar option "DEBUG" has been changed to "RAID" to eliminate a conflict with the 
DCALGOL c omp i 1 e r . 
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D3424 RJE - "SM" COMMANDS "RSC, SPO" 

Two new SM commands have been implemented to control the use of the *SM command by terminal 
users. The commands RSC and SPO have the following syntax: 



-<rje mix#> — SM RSC — 

- SPO - 



- + - 



The RSC command is used to control the device address "01" station (the Remote Supervisory 
Console) in an RJE family of stations, while the SPO command does the same thing but for 
non-RJE terminals (e.g., terminals transferred to RJE from some other MCS) . The setting (+) of 
RSC and SPO allows the affected terminals to use the *SM syntax regardless of the setting of 
the SPO NDL bit. The resetting (-) of the options causes the setting of the SPO NDL bit to 
control access to *SM. A request of just RSC or SPO causes the display of the current setting 
of the requested run-time option. 

The following are the possible responses to an RSC or SPO request: 

SPO IS SET 

SPO IS RESET 

RSC IS SET 

RSC IS RESET 

Corresponding compile-time dollar options, RSC and SPO, have been added. They are RESET by 
default, and have the same meanings as the run-time options. 

D3428 RJE - BAD DEVICE ADDRESS 

RJE will now display the correct device addresses (both transmit and receive) for bad stations 
(addresses that do not conform to the RJE standard). 

D3429 RJE - HALT/LOAD RESTORE 

RJE will now automatically restart a session to a remote terminal following a Halt/Load at the 
host site if the following are true: 

1. The remote terminal was active before Halt/Load. 

2. The remote terminal has LOGON reset (no usercode required). 

3. The LINKFILE is intact after the Halt/Load. 

4. The remote terminal is on a leased line (non-switched). 

RJE will then display its header message followed by the word "RESTARTING". Any "AUTOBACKUP" 
that was running at Halt/Load time will be continued or restarted depending upon the setting of 
the user terminal option CONTBACKUP. Any card input or "WFLCOMPILER[xx] " task that was active 
wi 1 1 be los t . 

It should be noted that RJE wi 1 1 not restart automatically after the Halt/Load if it was 
initiated in the following manners: 

1. Run by use of the ODT primitive ??RUN. 

2. Run by the DCP in response to new station activity. 

In the above cases, RJE will ony restart when there is station activity, forced to run by use 
of the WFL RUN command (or ??RUN ODT primitive), or EOT, EOJ notification from the CONTROLLER 
of a AUTORECOVERY restarted RJE task or job. 

For RJE to restart automatically, AUTORECOVERY and AUTODC run-time ODT options must be set and 
RJE must have been run (not ??RUN ODT primitive). 

Regardless of how RJE restarts, if the above described conditions are met, the remote terminal 
wi 1 1 restart . 



D3475 RJE - RUNTIME OPTIONS SAVE THROUGH LINKFILE PURGE 

The RJE run-time options (WAIT, FTSBUG, SPO, RSC) will be maintained at BOJ , even if 
linkfile is being purged due to incompatibility. 

D3476 RJE - PROGRAMDUMP OUT OF "FILEX, FILER" 

RJE will now take PROGRAMDUMP out of FILEX and FILER for any fault if RAID is set TRUE 
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D3639 RJE - "RJE" VS. "SYCOM" 

control message All o?her stations will receive printer sess.ons as .n the past. 
D3 640 RJE - "ODT" TO "ODT" COMMUNICATION 

system's RSC station. 

*SM SS to non-host systems will still be prefixed by "#FROM SPO :". 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
REMOTE JOB ENTRY 



P2626 RJE - "COPY" SYNTAX NOT CHECKING FOR BLANKS 

RJE now allows blanks in the COPY syntax when the volume kind is being specified. 

Example : 

(KIND = PACK) 

This example is now acceptable with blanks around the equal sign. 

P2746 RJE - AUTOBACKUP OPTIMIZATION 

The number of I/Os required to read backup files by RJE has been reduced by 50%. This should 
cause faster printing to RJE stations with high speed datacom lines and printers. 

P2874 RJE - BAD QUEUED FILE TRANSFER COUNT 

The queued file transfer count is now correct at restart. The QUEUECOPY procedure does not 
allow the queued count to be less than zero. 

P2875 RJE - "TIME(I)" VS. "TIME(U)" 

RJE now uses TIME(14) for all its internal timers instead of TIME(l) and TIME(ll). This 
corrects several problems when the time of day on the host system was reset to an earlier time 
or the midnight time change occurred. 

P2968 RJE - "B1800" WITH "B9247-13" TRAIN PRINTER 

If the last two characters generated by RJE in the final print record are "RS" "0" (4"1EF0"), 
they are stripped from the message. This allows Model B9247-13 train printers to be made not 
ready. It has no effect on any other model printer.s. 

P2969 RJE - "COMMENCEPF" SET ON WRONG PRINT QUEUE ENTRY 

RJE would update an incorrect word in PRINTQARRAY if the same jobnumber were PBed more than 

once. This would cause the AUTOPRINT routine not to be able to skip forward or backward upon 

rquest. In addition, the duplicate request in the PRINT QUEUE would terminate with no BD file 
on DK or PK. 

RJE now disallows entry into the PRINT QUEUE of a job already queued through the use of the 

command: "*PB <job number/. This command is still valid to move a PRINT QUEUE entry to the 

head of the queue, but results in the following error message if the entry is already at the 
head of the queue: "JOB ALREADY AT HEAD OF PRINT QUEUE". 

P3076 RJE - "RJE" PROTOCOL VERSION 

The protocol version byte in the STATION-ID (09) control message is now compatible with B1800 
and B800 SYCOM. 

P3077 RJE - "RJE PUTREPLY" VS. "SYCOM" 

RJE's PUTREPLY (17) control message is now compatible with B1800 and B800 SYCOM. 

P3078 RJE - BUFFER SIZE CONTROL MESSAGE "02, 04" 

RJE now responds correctly with an 04 (BLOCKSIZE REPLY) control message upon receiving an 02 
(BLOCKSIZE) control message. 

The maximum value RJE allows for BLOCKSIZE is 1500. The first 02 control message received by 
RJE sets maximum BLOCKSIZE value for the duration of the session. The value can then be 
changed to any value between 132 (the minimum value) and the value specified in the first 02 
mes sage . 

The BLOCKSIZE will revert to the default value of 400 at log-off. 

P3079 RJE - "ABORT COPY" REQUEST VS. "SYCOM" 

RJE's handling of ABORT COPY requests (18 and 19) control messges is now compatible with B1800 
and B800 SYCOM. 

P3126 RJE - PROTOCOL VERSION MISMATCH 

RJE will not allow any file transfers or terminal-to-program connections between hosts if the 
protocol versions do not match. 
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P3151 RJE - "SM" COMMAND 
An *SM command not followed by a verb or any text from a terminal transferred to RJE no longer 
hangs the procedure PERFORMSM. 

P3202 RJE - FILE TRANSFER SECURITY 

RJE's file transfer feature will correctly handle the source and destination files with regard 
to security. The following restrictions are now enforced: 

1. A non-privileged usercode cannot use the ■•" syntax . »°"gj[ R ^»! ercoded fileS " ThC 
following error message is displayed: # FILE MUST BE IN OWN DlKfcClUKi . 

2. A non-privileged usercode cannot use the l*" ■*{"»' ° C REATED IN OwTdIRFCtSrY" fi ' e ' ThC 
following error message is displayed: # FILE MUST BE CRKAIED IN own uirllium . 

3 A non-Drivileeed usercode may only copy some other usercode files if the security of the 
file allows it If the security requirements are not met, the follow. ng error message is 
displayed: "# FILE <filename> NOT RESIDENT . 

4 A non-orivileeed usercode may not create a file under some other usercode. The following 
trror messaged displayed: "# FILE MUST BE CREATED IN OWN DIRECTORY". 

None of the above restrictions apply to privileged usercodes. 
P3345 RJE - EXTRA LINKFILE UPDATES REMOVAL 
An extra update of the Linkfile has beenremoved from the code handling the *SM ODT command 
"BUG" and an extra update in "LOGENTRYON" . 

P3346 RJE - LINKFILE UPDATES 

The linkfile updates caused by the File Transfer procedures FILEX and FILER now take place f rom 
the outer-block of RJE. This will eliminate corruption of the linkfile when both FILEX and 
FILER try to update simultaneously. 

P3439 RJE - LOST AVAILABLE RECORDS 

In some cases, RESTARTRECORDMANAGER would forget about a group of ayai 1 abl e "cords ■"« • 
restart. This would cause the possible corruption of the link file if all RJE stations naa 
current printer output. This problem has been corrected. 

P3440 RJE - INVALID PRINTER CHARACTERS 
The following hex characters have been added to RJE's invalid character list of translation to 
"?" (4"6F") for printer output: 

"48", "49", "59", "69", "6A", "EO" 

P3441 RJE - DISCONNECT OF SWITCHED LINES AT LOGOFF 

RJE will now correctly disconnect a dialin line sit logoff. 

P3678 RJE "PB" OF FILES WITHOUT SUMMARY 

Entering "PB of a printer backup file that had no summary f i 1 e °%* *y*l em K plcK^at tempting 
called "PACK" would cause the Autobackup stack to hang on an RSVP REQUIRES FK. PACK, attempt ng 
to remove the nonexistent summary file from "PACK". This problem has been corrected by caus ng 
R?E To start its directory searches with the family "DISK" instead of the last family in the 
summary file search. 

P3682 RJE - REMOVE SUMMARY FILE 

RJE will not correctly remove the summary file when it is now on the same family as the backup 

files. 
P3753 RJE - "RSO" IN PRINTER BACKUP RECORD 

RJE was incorrectly positioning its output pointers after skipping an "RSO" in a printer backup 

record. This problem has been corrected. 

P3754 RJE - ABORT COMPATIBILITY 

RJE is now compatible with B1800 and B800 SYCOM in its handling of file transfer ABORT messages 
18 and 19. 
P3777 RJE - FILE TRANSFER INPUT BLOCK SIZE 

RJE now allows input file transfer blocksizes up to 3000 characters automatically to 
accommodate B1800 P and B800 SYCOM. The FYBLKSZ value of the SF and TF RJE commands now only 
affect the output file transfer blocksize. 
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P3778 RJE - "##RJE"" MESSAGE REMOVED 



All "##RJE" messages that were issued at logon have been removed for compatibility with B1800 
and B800 SYCOM. 

P3779 RJE - OBJECT SYSTEM IN SYMBOLIC HEADER 

RJE now enters the correct object system model in the file transfer symbolic header B6800 was 
previously entered. 

P3804 RJE - STATION LOGOFF AT "RJE" "QUIT" 

RJE now logs-off all stations when the SM QUIT command is used, thus allowing a cleaner restart 
when RJE is subsequently executed. 

P3805 RJE - "22 CONTROL MESSAGE NO-OP" 

If RJE receives a 22 control mssage (terminal disconnect) for a station not connected it will 
be ignored. 

P3806 RJE - COPY REQUESTS REJECTED 

RJE now rejects all copy requests until a 23 (EOF confirmation) or an 11 (FETCH recovery) 
control message has been received. This corrects a timing problem with file transfer during 
restart of RJE. The copy requests are rejected with the following message: 

"HOST <hostname> IS NOT FILE TRANSFER CAPABLE- INITIALIZATION NOT 
COMPLETE" 

P3807 RJE - PARITY ERROR ON "REMLP" FILES 

REBUILDPRINTQUEUEs no longer DS when they encounter a parity error reading a REMLP file The 
file causing the error is removed. 

P3808 RJE - "AUTOPRINT" "INVALID INDEX" 

It was possible for AUTOPRINT to fault DS with an INVALID INDEX when an "END" banner was being 
printed. This no longer occurs. 

P3809 RJE - SEND CONTROL LENGTH UPDATE 

An erroneous reference to the remote ODT's terminal width when updating a message length has 
been corrected. 

P3810 RJE - LENGTH OF "*RS" REPLY 

Procedure RSVP now correctly calculates the length of an ODT reply to a *RS command 
Previously, an extra null character was appended to the end of the reply. In some cases this 
would cause a B771 terminal to hang. 

P3811 RJE - INCORRECT BACKUP FAMILY 

£i£J?Si?Ei ^f e R J E .AUTOBACKUP failed to find CANDE backup files due to an incorrectly-set 
FAMILYNAME file attribute, has been corrected. 
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DOCUMENT CHANGES NOTES (D NOTES) 



SCRMCP 



D2970 SCRMCP - "IVR" FACILITY 

An Initialize Verify and Relocate (IVR) facility has been implemented in MAINTENANCE for the 
Model 2S0 Disk ^ck Drive and the Model 207 Fixed Drive Disk. The IVR f ac, 1 . ty has a so been 

implemented for Model 235 Disk Packs. However, 235 packs may only be IVRed a cylinder at a 
?me i e "ALL" may not be used in the IVR statement. This facility establishes sector 

addresses aid boundaries, verifies the media, and .relocates erroneous sectors. 

There is no standalone facility for IVR. 

SYNTAX 



A new construct in the Maintenance And Test (MAT) language has been added to allow easy 
initiation of the IVR Facility. The syntax is: 



IVR 



./1\- PK <pack number>- 



-/1\- SERIAL <serial number>- 



-/1\- 



CYLINDER <cyl inder number>- 



- ALL 
-/1\- NAME - 



-<name> 

- " — <name>- 



SEMANTICS 

This construct is an <I/0 statements and may appear anywhere in a MAT prog """Humber^used 1 ^ 
statement) is allowed. It may not appear in a program loop and none of the numbers used as 
parameters may be variable. 

The IVR Function may be initiated simply by entering at the ODT "SCR IVR". The IVR Facility 
will respond with requests for any additional required data. 



Note: 



Note ; 



Prior to an IVR, the pack must be closed and reserved (via the CLOSE and UR ODT 
commands; see Mark 3 1 GENERAL note D2535 for details). This implies that the pack is not 



comma 
in use 




make it operational 



IVR OPERATOR REQUESTS 



The operator can enter the following requests during IVR execution (where <mix number> is the 
mix number of MAINTENANCE): 

a. <mix number >AX STATUS 

This request will cause IVR to display the "status" message described in " IVR Messages " . 

b. <mix number>AX QUIT 

This message will cause immediate normal termination of IVR execution. 

c. <mix number>DS 

This message will cause immediate abnormal termination of IVR execution. All IVR processing 
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stops upon detection of the DS message. 

IVR MESSAGES 



During IVR the following messages will be displayed on the ODT: 

a. IVR PKuuu: INITIATED(PACK IS OF TYPE <type>) 

This message marks the start of IVR execution and specifies the type of pack being IVRed. 

b. IVR PKuuu: I/O ERROR(CYLcc ,HDhh , SECTORS s , <opcode> OP, RD=<result descriptor) 
This message is displayed for every I/O error encountered during IVR execution. 

c. IVR PKuuu: CYLcc.HDhh.SECss RELOCATED 

This message is displayed each time the IVR Facility relocates a sector that has failed 
verification. The failing sector is specified in cylinder/head/sector format. 

d. IVR PKuuu: COMPLETED % <time> 

This message indicates normal termination of IVR. 

e. IVR PKuuu: ABORTED 8 <t ime>(<abor t cause>) 

This message indicates an abnormal termination of IVR and is caused by an operator DS/QUIT 
or by an irrecoverable error encountered during execution. 

f. IVR PKuuu: STATUS 6 < t ime> (CYLcc , RELOCrr, APPROX END TIME <time>) 

This message displays the current status of IVR execution. It is displayed in response to an 
operator "STATUS" request, and specifies the cylinder currently being IVRed, the number of 
sectors relocated during the total IVR, and an approximate end time. 

g. IVR PKuuu: THIS PACK IS OWNED BY "<owner>" 

ENTER OK (TO OVERRIDE) OR QUIT 

This message is displayed whenever a pack to be IVRed contains an owner in the label. IVR 
will not proceed until the operator enters "<mix number>AX OK". 

IVR LOGFILE 



During IVR execution all operational events are logged into a printer file. This file will be 
printed at the completion of the MAT program. The format of a log file entry is: 

<time> <entry type> <text> 

There are six different log entries: 

a. BOT marks the beginning of the task. 

b. INP records all input parameters to IVR. 

c. OPR records all input requests from the operator. 

d. MSG records all output from the IVR Facility. 

e. ERR records all errors detected during IVR execution. 

f. EOT marks the end of IVR execution. 

FATAL ERRORS 



The following is an explanation of errors that will cause abnormal termination of IVR 
execut ion : 

a. IVR PKuuu: ILLEGAL UNIT NUMBER 

The specified unit number is outside the permissible range of 1-255. 

b. IVR PKuuu: UNIT NOT READY, NOT CLOSED OR NOT RESERVED 

The pack must be closed, in a reserved state and physically ready before an IVR may occur. 

c. IVR PKuuu: INVALID PACK TYPE 

The IVR Facility was unable to identify a valid type of pack. 

d. IVR PKuuu: UNIT ASSIGNED TO ANOTHER "lOGRAM 
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The specified pack is already in-use by another MAT program. 

e. IVR PKuuu: ILLEGAL CYLINDER NUMBER 

The specified cylinder is either less than 1 or greater than the maximum allowed for the 
spec i f i ed pack . 

f . IVR PKuuu: FULL-PACK IVR NOT VALID FOR THIS DISK PACK TYPE 

"ALL" was entered instead of "CYLINDER=cc " . Model 235 packs may only be IVRed a cylinder at 
a time. 

g. IVR PKuuu: INVALID SYNTAX 

The operator entered data in an illegal format. 

h. IVR PKuuu: I/O ERROR(CYLcc ,HDhh , SECTORS s , <opcode> OP, RD=<result descriptor) 

Any fatal I/O error will cause IVR to terminate. The operation causing the failure is 
displayed along with the failing result descriptor. 

D3072 SCRMCP - "BUFFMEM" MODIFIER ADDED 

A new I/O modifier, BUFFMEM, has been added. When a READ or WRITE to a 7A magtape control is 
modified by BUFFMEN, the system will read from or write into its control buffer memory. 

The following changes should be made to the On-Lime Maintenance and Test (MAT) Language Manual 
(Form No. 5000169) : 

Page 7—14* 

<read mt modifier) syntax should read as follows: 

"<READ MT MODIFIER>::=<STANDARD I/O MODIFIER)/ 

<DENSITY I/O MODIFIER>/<PARITY I/O MODIFIER)/ 
<DIRECTION I/O MODIFIER)/ 
<BUFFER MEMORY I/O MODIFIER)" 

Page 7-35 • 

<write mt modifier) syntax should read as follows: 

"<WRITE MT MODIFIER): :=<STANDARD I/O MODIFIER)/ 
<DENSITY I/O MODIFIER>/<PARITY I/O MODIFIER)/ 
<BUFFER MEMORY I/O MODIFIER)" 

Add the following to the description of " I/O MODIFIERS" : 

"BUFFER MEMORY I/O MODIFIER 

SYNTAX: 



<BUFFER MEMORY I/O MODIFIER): :=BUFFMEM/<EMPTY> 
EXAMPLES : 



1 . BUFFMEM . . . 

2. ... BUFFMEM 
SEMANTICS: 



THE <BUFFER MEMORY I/O MODIFIER) CAUSES A READ OR A WRITE TO BE PERFORMED ON A 7A 
MAGTAPE CONTROL BUFFER MEMORY. 

BUFFMEM MAY ONLY BE USED WITH A 7A MAGTAPE CONTROL. " 
D3169 SCRMCP - LOCAL "MCP" CODE 

A laree area of MCP save code is used as a test pattern source for disk tests 14, 15 and 16, as 
we 1 as diskpack tests 4, 5 and 7. Because of a reorganization of MCP save code, there have 

been some changes to these tests. The changes have no major effect on the operation of the 

tests, but do affect the documentation. 

These tests all use MCP save code as the test pattern. This code i s no longer in " segment 5 " 
and all references to "seg 5" in the documentation should be eliminated. On a B6800 
mumproressor (Hgntly-coupUd) system, there is some MCP save code in each local memory 
Tuby ?em and ome fn the Global subsystem; SCR wi 1 1 use the save code in the subsystem in which 
?he SCR stack is running. That is, if SCR runs (by default) in a local processor, that 
cmo ! I a code is used, but if SCR is forced to run in * GLOBAL tm Memory, the 

S oba save code s uted. (The base pattern from a given MCP code file is the same in a 
monolithic system as in any local subsystem; the base pattern m Global memory is different MCP 
coSe, so it will have similar bit distributions but not identical bit sequence. The actual 
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pattern written is varied from one test to another by varying the starting point in the base 
pat tern . ) 

* "GLOBAL Memory" is a trademark of Burroughs Corporation. 

The documentation for these tests refers to a constraint that the test area must be at least 
20% as long as seg 5. This constraint was not properly documented; it actually concerned the 
length of some overhead space associated with SCR's use of seg 5. The constraint has been 
rendered inapplicable and has been removed; all documentary references to it should be 
e 1 imi na t ed . 

D3256 SCRMCP - "IVR" FOR "215,225" PACKS 

Initialization and verification (IV) of Type 215 and 225 packs has been subsumed by the IVR 
maintenance facility. However, the IVR syntax for Type 215 and 225 packs differs from the 
syntax for Type 206, 207 and 235 packs. The syntax is a subset of the options which are 
available for IV. The excluded options may be used when RCing the pack. 

Note: Until the Mark 33 release, IV can be used; effective with the Mark 33 release, IVR must 
be used. The following message is issued if IV is attempted: 

"WARNING: IV OPERATIONS MUST BE DONE VIA SCR ON THE 3 3 RELEASE". 

Note: Only one IVR statement for a Type 215 or 225 pack is allowed in a SCR program. 

IVR Syntax for Type 215 and 225 Packs 



IVR 



PK 



- < p a c k n umb e r > - 



-/1\- SERIAL <serial number>- 



-/1\- NAME <name> 

|- = - | |- " — <name>- 

< 

I < i 

-/1\- XD /52\-<cyl inderhead>- 



The IVR statement is used to format and analyze all of the tracks of the given pack. The 
master available table, volume labels and pack directory are also created and written on the 
pack. 

If the NAME = or SERIAL = options are omitted, the corresponding value is set to blanks or 
zeroes, respectively. XD cylinderhead is of the form CCC HH, where CCC is the cylinder address 
(0-405) and HH is the head number address (0-19) of the track to be XDed because it is 
defective. Counting begins at the bottom head. 

Exampl e : 

IVR PK 96 NAME=JUDP SERIAL= 123456 XD 20 5, 300 19 

The IVR statement causes two passes to be made over the designated packs. During the first 
pass, an initialize command is used to preformat each track with 30-word records. During the 
second pass, a verify command is used to test each record written during the first pass. The 
IVR routine attempts to relocate bad sectors to the spares provided on track zero of each 
cylinder. If this cannot be done, the track is automatically XDed. A report is produced that 
indicates I/O errors encountered, sectors relocated, and what tracks and cylinders were XDed. 

If an IV is attempted on a Type 235, 206 or 207 pack, the following message is displayed: 

"PK<nnn> NOT PACK TYPE 2 1 5 OR 225 - SHOULD IVR WITH SCR" 
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D3 342 SCRMCP 



IVR" TYPE "206" PACKS 



reviously, the default 

o CONTROLLER release 

eri f icat ion. Now, the 

release "MD" is "6363"; 



pattern used in ini t i al i zing type 

"MD") and the patterns 6363 

default pattern used in initializ 

therefore, only pattern " 9C9C is 



206 disk packs was 4"6DB6" 
and "9C9C" were used 
mg type 206 disk packs on 
used for wr i te 



(previous 
for write 
CONTROLLER 

vet i f icat ion . 



D3345 SCRMCP - "IVR" TYPE "207" PACKS 



address errors or 



IVR will now retrv errors which are not 

ila Type 207 P ack; otherwise, errors will be retried only once 
really errors; they are not retried. 



data errors three times if the pack 
Data-corrected errors are not 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SCRMCP 

P2794 SCRMCP - PACK DENSITY NOT ESTABLISHED PROPERLY 

Under certain circumstances, the pack density would not be determined correctly in SCR (e g. 
the pack was reserved and wr i t e-di sabl ed at Halt/Load time). This problem has been corrected!' 

P2812 SCRMCP - CORRECT FAULT MESSAGE 

Previously, a fault in MAINTENANCE would print the wrong RCW where the fault occurred Now 

irur.^'"' ls P rlnted . and the sequence number where the fault occurred is printed if 
LINEINFO was set. v 

P2853 SCRMCP - "INVALID OP" FOR "COMPARE BUFFER ON ERROR" 

cddoI y / * em wou,d *et an INVALID OP when a compare error occurred doing "COMPARE BUFFER ON 
ERROR (<compare error action list>)" and <compare error action list> contained "PRINT DATA" but 
did not contain "PRINT RESULTS" . This problem has been corrected. 

P2858 SCRMCP - "7A" MAGTAPE CONTROLS 

Tape erases have been broken into 1600-word segments. 

P2891 SCRMCP - STOP REPEATING FIRST LINE OF "ODT" INPUT 

Previously, MAINTENANCE would print the first line twice in a program listine if it was 
initiated from the ODT. This problem has been corrected. 

P292 2 SCRMCP - MEMORY MODS FOR MAINTENANCE, "GMM" INTRINSICS 

The bookkeeping for maintenance testing of memory mods has been corrected for B6800 
"mFFFR° Ce AnmP^ SySt - mS - . T ? e - SYSTEST/GMM routines are affected, as well as the 
BUFFER. . .ADDRESS =.. . constant in SCR; no change has occurred for correctly-used tests. 

The intrinsics GLOBALMEMORYTEST and GMMSCAN are now incorporated in the MCP. 

P2923 SCRMCP - "SCR/MCP" VERSION 

The code to learn and display the PATCHNO in the MCP level for SCR has been corrected. The 
separate MAT level is no longer displayed (it has to be the same as the MCP). 

P2957 SCRMCP - BUFFER WITH ADDRESS SPECIFIED 

Accessing a buffer declared at a specific address in memory would cause a SEG ARRAY error 
Ihis problem has been corrected. »«■■ 

P3005 SCRMCP - WRONG DENSITY FOR FILE "I/O" 

The wrong density was used for an I/O with a disk or pack file specified. This problem has 

P3049 SCRMCP - "IVR" WRITE DISABLED PACK 

IVRing a write-disabled pack no longer gives a WRITE LOCKOUT error when reading the pack. 
P3069 SCRMCP - "VERIFY DISKPACK (SELECT ALL REPEAT)" 

timlI° U »u'„7 h t!! veri fy in * ? J d i sk P ack > "fleeting all tests and repeating them a number of 
times, all of the tests wou d be done only once. This problem has been corrected; now, all the 
tests are repeated the specified number of times. 

P3123 SCRMCP - WARNING MESSAGE 

Previously, if two successive errors occurred while reading the label on a dedicated unit or on 
' ?** k H e '" 8 IVRed ' MAINTENA NCE would give a confusing warning message. This problem has been 

P34 59 SCRMCP - "AX" MORE THAN "60" CHARACTERS FOR "IVR" 

Previously, during a maintenance IVR of a pack, entering "<job #> AX <msE>" at the ODT whpre 
<*sg> exceeded 60 characters, caused a Se6 ARRAY fault* T„ i s prooTem has been corbeled- now 
up to 80 characters may be entered. 
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DOCUMENT CHANGES NOTES (D NOTES) 
PERIPHERAL TEST DRIVER (PTD) 

D3123 PTDTEST - "B6900" PERIPHERAL TEST DRIVER 
1 . PTD EXECUTION 

On the B6900 the Peripheral Test Driver is a selectable module whose equivalent on the B6700, 
EfiROO is SCR "PTO" is recognized by the WFL compiler, running on a B6900 as the command to 
stlrt SYlTEM/MAINTEiANCE as an 8 independent runner. "PTD" is not recognized by od WFL wh.ch 
means thaTeiYher option 29 (CONTROLOLDWFL) must be set or the request to initiate PTD must be 
preceded by "BEGIN JOB;". 

PTD is an MOP procedure that interprets op-codes ("S-ops") found in the test case S-code file 
i.II.a h„ ?he n«e Thus to initiate a test on a particular type of per ipheral/DLP, the 
^^must labei-e^ua'the TppropHate lOSO-provided tes/case code file to PTD' s .nternal 
SCODE file. 

In the Large Systems implementation, PTD can be operated from either an ODT or a datacom 
terminal In either case, all PTD input and displays are through a logical file titled PTDSPO 

PTDSPO to the station name; the group-separator is not used with this medium. 

PTD can be executed with a VALUE clause that sets certain of its options immediately at run 
time. This feature is useful primarily in debugging test cases or PTD itself. lne relevant 
bits are : 

[2:1] TRACE (test case S-ops in execution) 
[1:1] DUMP (test case virtual memory dump) 
[0:1] PGMDUMP (program dump of PTD) 

Hence, executing PTD with VALUE = 2 causes the DUMP option to be set, VALUE = 3 sets both DUMP 
and PGMDUMP, etc. 

GENERAL EXECUTION SYNTAX: 

In general, the Large Systems PTD is executed by entering a command of the form: 
PTD; FILE SCODE(TITLE = <S-code file name>) 

Other items are entered depending on the setting of option 29, the user's choice of d^°g»e 
device, and the user's (rare) decision to add the VALUE clause. Actual SCODE file names are 
used in the following examples. See the field support kit provided by OSO for detailed 
descriptions of the release tape, file naming conventions, and individual test case 
documentat ion . 

ODT EXECUTION EXAMPLES: 

PTD is executed at an ODT and all subsequent operator dialogue °^urs at that ODT All three 
forms are acceptable if CONTROLOLDWFL (option 29) is set; only the third form ( BEGIN JOB, . 
.") is acceptable if CONTROLOLDWFL is reset. 

PTD; FILE SCODE(TITLE = PTD/MAINT/CP) 

PTD; FILE SCODE(TITLE = PTD/CONF/CR ON DMS); VALUE = 1 

BEGIN JOB; PTD; FILE SCODE(TITLE = PTD/MAINT/PE) ; VALUE = 2 
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ODT INITIATION, REMOTE (DATACOM) DIALOGUE DEVICE EXAMPLES: 

PTD is executed at an ODT but all further dialogue occurs at the specified datacom terminal 
All three forms are acceptable if CONTROLOLDWFL (option 29) is set: only the third form ("BEGIN 
JOB; . . .") is acceptable if CONTROLOLDWFL is reset. 

PTD; FILE SCODE(TITLE = PTD/MAINT/HTS ON DISK); 

FILE PTDSPO(KIND = REMOTE, TITLE = TD450365) 

PTD; FILE SCODE(TITLE = PTD/CONF/PSS) ; STATION =55; VALUE = 3 

BEGIN JOB; PTD; FILE SCODE(TITLE = PTD/CONF/PE) ; STATION =55 



REMOTE EXECUTION EXAMPLES: 



PTD is executed at a logged-on CANDE terminal and all subsequent operator dialogue occurs at 
CONTROLOLDWFL 1 Notice that "BEGIN JOB;" is required. irrespective of the setting of 

WFL BEGIN JOB; PTD; FILE SCODE(TITLE = PTD/MAINT/PE) • 
VALUE = 1 

WFL BEGIN JOB; PTD; FILE SCODE (TITLE=PTD/MAINT/PE) 

WFL BEGIN JOB; PTD; FILE SCODE(TITLE = PTD/MAINT/HTS 

ON TESTPACK) ; 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 PERIPHERAL TEST DRIVER (P 



PAGE 449 



B6000 SERIES MARK. 32 



2 . PTD DIRECTIVES 



When executed, PTD first performs some internal initialization steps that may take a few 
seconds to ccomplish depending on the size of the test case code file and the number of other 
jobs in the mix ? As noted elsewhere, PTD displays the testcase f.le name and release-level 
data and then enters its idle state after displaying: 



AWAITING DIRECTIVE 



Any valid PTD directive can now be entered, one directive per transmission. PTD recogni zes any 
«™hlr «f porrect v soelled characters from the minimum (underlined) set to the fully formed 
word i.e , »I PRIN, aKd PRINT are acceptable, while PR and PRINNT are not. The direct.ves 
fall into four general categories and are summarized below. 
Remember that if the ODT is used, the group-separator character (OS) must appear in column one. 



To set a toggle the user enters the option 



TOGGLES 

These are options that are either on or off. -~ T „„ --,-■.. , , „,.,, „, w , 

name onlv to reset a toggle the user enters the option name followed by O , OF , or 
"OFF". Hence, "PRI" sets the PRINT toggle; "PRI O" or "PRINT OFF" resets it. 

DISPLAY - Messages are displayed to the ODT or remote terminal. 

When the medium is an ODT, resetting DISPLAY causes PTD 
to close its PTDSPO file so that normal system display 
traffic may resume. 

Default: DISPLAY IS SET. 

DUMP - Prior to EOJ , the test case's data memory area is dumped 

to a printer file. Set this option for documentation 

of test case or PTD problems. 

Default: DUMP is RESET. 

IOTRACE - I/O information is displayed before and after every test 
case I/O operation. Prior to initiating the I/O, the 

MLI REQUEST and IOLENGTH are shown. After the I/O has 

completed, PTD displays the MLI RESULT, the number of 

data-bytes transferred, and an "MLIP" result. 



The 
"MLI 

test 
for 
resu 
wi th 
the 
by i 
The 
use 
5 be 



user should be aware that whenever the words 

P RESULT" are used in the context of PTD or an IOSO 

case, they refer to a value constructed strictly 
the purposes of a programmatic, host independent 
It descriptor that summarizes errors that occur 
in the host to MLI interface. On Large Systems, 
true MLIP result descriptor can be obtained only 
nspecting the test case IOCB(s) as they complete, 
address of the IOCB is made available through the 
of the special I/O options, described in Section 
low. 



Default: IOTRACE is RESET. 
LOG - to be specified. 

Default : LOG is RESET. 



MONITOR 



All display traffic is written to a printer file and is 
formatted such that all operator entries are flagged 
with an asterisk ("*") in column one. 

(The MONITOR and PRINT functions are soon to be merged 
into the PRINT toggle; for now, the user should set both 
MONITOR and PRINT.) 

Default: MONITOR is RESET. 
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PGMDUMP - Prior to EOJ , PTD dumps itself (via PROGRAMDUMP) to a 

printer file. Set this option for documentation of test 

case or PTD problems. 

De fault: PGMDUMP i s RESET . 

PRINT - PTD prints test case specified text to a printer file 

when the PRNT S-op is encountered. (See the note in the 

description of MONITOR, above.) 

Default: PRINT is RESET. 

TRACE - PTD writes each test case S-op to a printer file after 
the S-op is executed. It is used for test case and PTD 

debugging. Since vast numbers of S-ops are executed in 

the usual test case, tracing them may waste storage 

space and paper. 

DEFAULT: TRACE is RESET. 

B. I/O ERROR CONTROL 

?f^i a, i y ' the teSt Case issues the I/0 < via the exi O S-op), waits for it to complete 
(IOCW S-op), and then checks the results. If it finds a result descriptor, data or 
length error, it notifies PTD of the error via the EROP S-op. 

When PTD encounters the EROP S-op, it either stops and idles or ignores it, depending on 
what the user has directed. By default, PTD halts on the EROP S-op. 

ERROR HALT 

- PTD halts on any non-fatal I/O error and displays: 

STOPPED ON ERROR 

At this point, any valid PTD directive may be entered. 
(The GO directive, explained below, causes PTD to 
continue execution at the very next S-op.) 

ERROR IGNORE 

- PTD treats all non-fatal test case I/O errors as 
no-ops; execution continues uninterrupted. 

Note: The test case may retry an I/O as part of its testing algorithm, but no I/O is ever 
automatically retried by PTD or the MCP . 

C. PTD STATUS 

The current status of PTD is obtained via the STATUS directive. 

STATUS - PTD displays the number of the section currently in 

execution, the toggles that are set, and the setting 

of the ERROR opt ion. 

D. SECTION CONTROL DIRECTIVES 

This class of directives controls the actual execution of the test case. As described 
elsewhere, test cases are organized into numbered "sections" that perform certain 
operations. There are groups of sections that fall into logical categories called 
bl ocks . 

For example, block 100 may consist of sections 101, 102, and 103, where those particular 
sections test the TESTID, the READBUFFER, and the WRITEBUFFER operations respectively 
Other blocks may consist of sections designed to perform complex sequences of data 
j«nU f r l „ drive a peripheral or DLP at a certain level of tolerance. Sections from 
^nSS above are u special" sections which must be explicitly invoked by the user; section 
r%2~ lls f s what the other sections do and is particularly useful. Refer to the 
IOSO-provided documentation for precise descriptions of the organization of each test 
case . 

The RUN, REPEAT, and GO directives place PTD into immediate execution. When execution of 
the specified section(s) has been completed, PTD displays: 

AWAITING DIRECTIVE 

and idles until a new directive is entered. 
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RUN <sect ion 1 ist> 



PTD executes those sections or ranges of sections 
contained in the <section list>. The section list may 
be empty, or the list may contain a single section 
number, or a range of sections, or it may contain up to 
ten sections and ranges separated by commas. 

If only the word "RUN" is entered, PTD ALWAYS 
executes sections 100 to 2999. (Recall that sections 
from 3000 above must be deliberately specified.) 

Examples: RUN 

RUN 3999 

RUN 200 

RUN 101, 201 _ m 

RUN 203 TO 207, 301-302, 4000-END 

Rules: a. The maximum number of pairs of section 

numbers that can occur in a <section list> 
is 10. (A single section number, 305 say, is 
treated as the pair: 305-305.) 

b. In any section pair, the second number must 
be greater than or equal to the first. 
For example: "RUN 300-101" is an error. 

c The word END can appear only as the last item 
in a <section list> and must be preceded by 
"<number> -" or "<number> TO". 
For example: "RUN END" and "RUN 101, END are 
both erroneous entries. 

d The word END is interpreted to mean the very 
last section of the test case". When END 
appears in a RUN directive, PTD goes to end 
of job when execution of the final section 
has completed. 



REPEAT < sect ion list> 



REPEAT <section list> FOR <count> 



- The <section list> is repeated (looped on) either an 
infinite number of times or <count> times. As in the 
RUN directive, if no list follows the word REPEAT, 
sections 100-2999 are automatically executed. 

Examples: REPEAT 
REP F 3 

REPEAT 102 FOR 10 
REPEAT 101, 301, 102, 302 
REPEAT 207-209, 101, 305 - 400 

Rules- a. The maximum allowable value of <count> is 
999999999. 
b. The RUN <section list> rules also apply to 
the REPEAT directive, with the single 
exception that the occurrence of END does not 
cause PTD to go to EOJ . 

GO - When PTD either stops on an error (see ERROR d i rect ive) 
or is interrupted by the user (see item 5, PTD OPERATOR 
INTERRUPTION), the GO directive causes PTD to resume 
execution from the point where it was stopped. If the 
user had entered, say, "RUN 304", PTD would con t inue 
running section 304. Similarly, if PTD had been 
REPEATing a list, GO would cause it to continue exactly 
where it left off. 

However, if PTD has finished executing a section list, 
it responds to "GO" by displaying: 

SECTION LIST COMPLETED. USE 'RUN' OR 'REPEAT' 

Hence, "GO" always means "continue", and there has to be 
a function which PTD can continue. 
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QUIT - Terminates PTD. 
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3. SPECIAL LARGE SYSTEMS PTD DIRECTIVES 

There are Large Systems PTD directives that are intended primarily as aids in developing and 
debugging PTD and test cases. They may be useful in observing the flow of test case I/Os and 
have certain value (see IOSTOP) in stepping an I/O through the processor. 

With the exception of IOSTOP and LINES, the setting of a special option results in the analysis 
by PTD of the test case I/O currently in process at a selectable point in the execution of the 
test. Relevant DEVICESTRUCTURE information is displayed on the ODT or remote terminal. (A 
DEVICESTRUCTURE is the programmatic I/O interface between the test case and PTD and is 
analogous to a FIB, or File Information Block. Up to ten separate DEV RESTRUCTURES may be 
declared by the test case writer in the PTL (Peripheral Test Language) test case program; each 
carries all information relating to the I/O device, the I/O request, and the result of the 
operat ion . ) 

In every case, an asterisk must appear before the non-standard option name; they are set and 
reset like all other PTD flags (see item 2A, TOGGLES above). 

*HELP IODEBUG - 

- PTD displays explanation of special I/O options. 

*BOJ - Display each DEVICESTRUCTURE the first time it is 
touched after this option has been set. 

♦BOPEN - Display before each DEVICESTRUCTURE is opened. 

*AOPEN - Display after each DEVICESTRUCTURE is opened. 

*BIIO - Display before the I/O is initiated out of each 
DEVICESTRUCTURE. 

•AIIO - Display after the I/O has completed. 

♦BCLOSE - Display before each DEVICESTRUCTURE is closed. 

♦ACLOSE - Display after each DEVICESTRUCTURE is closed. 

*EOJ - Display each DEVICESTRUCTURE immediately prior to EOJ . 

•IOSTOP - At each user-selected analysis point, PTD 

programmatical ly stops after the DEVICESTRUCTURE 

display; entering any input or null reactivates PTD. 

If *BHO has been set in addition to 'IOSTOP, then 

after the I/O information display and attendant 

stop/start, PTD executes a conditional halt prior 

to firing the I/O (CHLT must be set on the machine). 

4" 10CB10CB10CB" is placed in the B-register and the 

address of the IOCB to be fired is placed in the A-reg. 

♦ALL - Sets all of the above flags. 

♦IODEBUG- Setting any of the above sets this toggle. Resetting 
this toggle disables all analysis, but the settings of 

all other toggles are preserved. If IODEBUG is 

subsequently set again, the flags are restored 

and the analysis resumes. 

In addition to the above toggles, the operator may specify the number lines of data to be 
displayed in the analysis output, allowing the user to view an entire data buffer on request. 
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*LINES <n> - sets the number of lines of data to be displayed, 
40 characters per line. Default is one line. 

All non-standard options are reset by default. 
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4. TEST DEVICES 

A test case is written with either a physical device or a baddisk file as its target. The 
connection between the test case and test object is established by way of: 

a . A p r o g r amin a tic test case data structure called a 
DEVICESTRUCTURE , 

b. The OPEN S-op, 

c. A device mnemonic or disk file name entered by the user. 

Once running, PTD eventually encounters an OPEN S-op, whereupon it displays: 

ENTER DEVICE FOR peripheral designation> 

or 

ENTER FILE NAME FOR <baddisk designation> 

where the ^peripheral designation> or the <baddisk designation> is merely a string of 
characters that PTD finds in the DEVICESTRUCTURE and displays on the screen. For example, in 
the cardreader test, the display looks like: 

ENTER DEVICE FOR CARDREADER 

In the case of a per ipheral/DLP test, PTD expects the user to enter a Large Systems unit 
mnemonic and optional path specification. The general form of the response is the following: 

<unit> VIA PATHID <pathid> 

Ex amp 1 e s : 

CR1 2 

PK57 VIA PATHID 17 

For baddisk testing, PTD expects the title of a valid Large Systems baddisk file, including 
family name, of the form 

<file title> ON <family name> 

Ex amp 1 e : 

BADDISK/FMLYINX1/UNIT192/AD405000 ON PACK 

Note: the "VIA" construct is not allowed for baddisk testing as only the spindle is assumed to 
be involved. 

PATH SELECTION 



The importance of a path selection capability is made obvious by the maintenance test cases, 
where a failure in a particular DLP (path) is the reason for running the test. 

On the Large Systems PTD, path selection is achieved by use of the word "VIA"; if only the word 
"VIA" follows the peripheral des i gnat ion> , PTD displays all paths to the specified unit and 
then asks the user to choose a path. If "VIA PATHID <pathid>" is entered, PTD issues all test 
case I/Os through that path. If "VIA" does not appear at all, PTD chooses an appropriate 
available path and uses it for as long as that DEVICESTRUCTURE is open. 

Example responses for the device-request in a PE tape test are: 
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MT17 
MT17 VIA 

MT 17 VIA PATHID 5 
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% PTD selects an available 
% path to the tape drive. 

% PTD shows all paths and then 
% polls the user for a selection. 
% (The form of the path 
% information display is similar 
% to that given in response to 
% the "OL" ODT message.) 

% All I/Os are through the 
% path (DLP) whose path ID is S. 
% "5" was a PATHID displayed 
% when the user typed " OL MT 17" 
% to the system. 



DEVICE STATUS RULES 



For the Mark 32 MCP release, PTD requires that devices be in a secure status before online 
testing can commence. Therefore, for maintenance tests (which are defined to be DLP-or i ented) : 

a. The target unit and all units outboard the DLP must have 
been reserved through the "UR <unit>" ODT message. 

b. The path (DLP) must itself be reserved by way of the 
"UR <unit> PATHID <path id>" ODT message. 

PTD ensures that the device is in the proper status before it completes the OPEN and notifies 
the user of any inconsistency. 
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5. PTD OPERATOR INTERRUPTION 

PTD operates in a "fetch S-op/execute S-op" cycle and is sensitive to an operator interrupt 

request before each fetch operation. An interrupt request is serviced only when all 

outstanding test case I/Os have been completed. When the operator-dialogue device is an ODT, 
PTD is interrupted by entering: 

< SYSTEM/MAINTENANCE mix number > HI 

Ex amp 1 e : 

1127 HI 

When the operator dialogue is through a REMOTE station, the "HI" statement must be preceded by 
a question mark in column one. 

Ex amp 1 e : 

79142 HI 

Once interrupted, PTD responds by displaying: 

AWAITING DIRECTIVE 
At this point, any valid PTD directive is accepted. 



6. TESTCASE EXAMPLE 

The following is an example of the printed output of the PE tape DLP maintenance test showing 
the use of the RUN, REPEAT, and GO directives, and illustrating one of the path selection 
techniques. PTD was operated at an ODT and, with CONTROLOLDWFL reset, was executed by 
entering : 

BEGIN JOB; PTD; FILE SCODE(TITLE = PTD/MAINT/PE) 

After the AWAITING DIRECTIVE message appeared, MONITOR was set — all subsequent operator 
entries are flagged with the asterisk in column one. When "MT17" was first entered, the unit 
was found not to be reserved; the operator reserved it with the "UR MT17" ODT message (directed 
to the system by omitting the GS character). Next, "MT 17 VIA" was entered to PTD, resulting 
in the path information display and path selection query. When the device was successfully 
open, the test case later reported errors that were due to the operator not having mounted a 
tape on the drive. With the exception of the operator dialogue, all messages are produced are 
produced by the test case. 

LISTING FOR TESTCASE=PTD/MAINT/PE 

AWAITING DIRECTIVE 
•PRINT 

AWAITING DIRECTIVE 
*RUN 101 

STARTING SECTION 0101 

— > ECHO OP - ALL BITS OFF 

ENTER DEVICE FOR MAGTAPE 
*MT 17 

UNIT MT 17 : NOT RESERVED. 

ENTER DEVICE FOR MAGTAPE 

[COMMENT: operator reserved MT 17] 
*MT 17 VIA 

UNIT 'Mm' : 
DLP ID =04 
BASE NUMBER = 000 
RELATIVE UNIT (W.R.T. DLP) = 1 
PATH INFORMATION 



PATH ID PROC MLIPPORT LEMPORT DLPNUM PATHSTATUS 

17 3 1 6 RESERVED, ONLINE 

ENTER DESIRED PATH NUMBER 
•17 
AWAITING DIRECTIVE 
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♦REPEAT 102 FOR 3 

STARTING SECTION 0102 

— > ECHO OP - ALL BITS ON 

STARTING SECTION 0102 

— > ECHO OP - ALL BITS ON 

STARTING SECTION 0102 

— > ECHO OP - ALL BITS ON 

AWAITING DIRECTIVE 
•RUN 200-END 

STARTING SECTION 0200 

— > OP CODES TEST 

### TEST SEL = 0200 TEST RUN = 0201 ################ 

OPCODE+VAR = 2F1000 

OPCODE = 2F0000 = TEST 

+ UNIT NUMBER = 1(01) 

& IDLENGTH = 0006 CHARACTERS 

CYCLE=001 1/0=00013 ERR:MLIP=000 L=000 RD=001 DATA=000 

RESULT DESCRIPTOR IS 41100000 

RD WD1 4000 = DESCRIPTOR ERROR 

RD WD1 0100 = TAPE UNIT NOT READY 

RD WD1 0010 = WRITE LOCKOUT 

RESULT DESCRIPTOR EX 00800000 

RD WD1 0080 = BOT (BEGINNING OF TAPE) 

### RD ERROR ##################### RD ERROR ######### 

STOPPED ON ERROR 
•GO 

### TEST SEL = 0200 TEST RUN = 0201 ################ 

OPCODE+VAR = 2F1000 

OPCODE = 2F0000 = TEST 

+ UNIT NUMBER = 1(01) 

& IDLENGTH = 0006 CHARACTERS 

CYCLE=002 1/0=00014 ERR:MLIP=000 L=000 RD=002 DATA=000 

RESULT DESCRIPTOR IS 41100000 

RD WD1 4000 = DESCRIPTOR ERROR 

RD WD1 0100 = TAPE UNIT NOT READY 

RD WD1 0010 = WRITE LOCKOUT 

RESULT DESCRIPTOR EX 00800000 

RD WD1 0080 = BOT (BEGINNING OF TAPE) 

### RD ERROR ##################### RD ERROR ######### 

STOPPED ON ERROR 
•QUIT 

*** EOJ PTD ••• 

D3199 PTDTEST - "PTDTESTS" TAPE 

A tape, "PTDTESTS'', is included in the B6000 series support release. It contains files 
required by hardware support personnel for maintenance and confidence testing of the new I/O 
facilities on the B6000 series systems. 

The files on the PTDTESTS tape may be categorized as follows: 

1. Confidence tests, PTD/CONF/= 

2. Documentation for the confidence tests, PTD/DOC/CONF/= 

3. Maintenance tests, PTD/MAINT/= 

4. Documentation for the maintenance tuts, PTD/DOC/MAINT/= 

5. A summary of the confidence and maintenance files, PTD/DOC/ INSTRUCTIONS 

(Any reference to files containing 'NS' in their titles should be ignored by B6000 series 
systems customers.) 

6. A users guide for the PTD (Peripheral Test Driver), PTD/DOC/USERS /GUIDE, which is augmented 
for B6000 series systems by note D3123 (B6900 Peripheral Test Driver), Mark 32 release. 

7. The symblic and object files (LISTNOTES, OBJECT/LISTNOTES) of a program for processing the 
•DOC' files. 

All the files, except LISTNOTES, are generated by the I/O Systems Organization and copied to 
the PTDTESTS tape. 

Processing the 'DOC' Files 



A 'DOC' file (e.g., PTD/DOC/ INSTRUCTIONS) may be printed by one of the following methods: 

1 . Batch Use 

RUN *OBJECT/LISTNOTES; FILE IN(TITLE=PTD/DOC/INSTRUCTIONS) ; 
VALUE N 
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2. Remote Use 



R ♦LISTNOTES; FILE IN(TITLE=PTD/DOC/ INSTRUCTIONS) ; VALUE N 

The default value N=0 will cause the document to be printed, without translation, on an 
EBCDIC9 6 printer. 

Value N=l will allow the document to be printed, with translation to upper case, on an EBCDIC72 
printer. 

Detailed operating instructions for LISTNOTES appear in note D3396, Mark 32 release. The 
operating instructions differ from those on releases prior to Mark 32. The instructions are 
also contained at the start of the symbolic file LISTNOTES. 

LIBRARY TAPE: PTDTESTS HAS 36 FILES, 25728 SEGMENTS 

FILE TITLE 

•LISTNOTES, 

♦OBJECT/LI STNOTES , 

♦PTD/CONF/BD2X5, 

♦PTD/CONF/BD20X, 

*PTD/CONF/CP, 

*PTD/CONF/CR, 

♦PTD/CQNF/IVR, 

*PTD/CONF/PE, 

*PTD/CONF/PS, 

♦PTD/CONF/TP, 

* PTD/DOC/CONF/BD , 
• PTD/DOC/CONF/CP , 

* PTD/DOC/CONF/CR , 
•PTD/DOC/CONF/ I VR , 
*PTD/DOC/CONF/PE , 
♦PTD/DOC/CONF/PS , 
♦PTD/DOC/CONF/TP , 
♦PTD/DOC/ INSTRUCTIONS , 

* PTD/DOC/MA I NT/CP , 

* PTD/DOC/MA 1 NT/CR , 

* PTD/DOC/MA 1 NT/HT , 
* PTD/DOC/MA 1 NT/LSP , 
* PTD/DOC/MAINT/NSP , 
* PTD/DOC/MA I NT/ODT , 
♦PTD/DOC/MA 1 NT/PE, 

* PTD/DOC/MA I NT/TP , 

* PTD/DOC/USERS /GU I DE , 
•PTD/MA I NT/CP, 
•PTD/MA I NT/CR, 
•PTD/MAINT/HT2X5 , 
•PTD/MAINT/HT20X, 
•PTD/MA I NT/LSP, 
•PTD/MAINT/NSP, 
•PTD/MA I NT/ODT, 
•PTD/MAINT/FE, 
♦PTD/MA I NT/TP, 



CR 


SEGS 


CREATED 


SECURITY FILEKIND 


% 


360 


07/05/80 


PUBLIC 


ALGOLSYMBOL 


% 


126 


07/05/80 


PUBLIC 


ALGOLCODE 


%♦ 


300 


09/04/80 


PUBLIC 


MDLCODE 


%♦ 


400 


09/04/80 


PUBLIC 


MDLCODE 


%* 


200 


09/04/80 


PUBLIC 


MDLCODE 


%* 


200 


09/05/80 


PUBLIC 


MDLCODE 


%* 


400 


09/04/80 


PUBLIC 


MDLCODE 


%* 


200 


09/04/80 


PUBLIC 


MDLCODE 


%* 


300 


09/11/80 


PUBLIC 


MDLCODE 


%' 


300 


09/04/80 


PUBLIC 


MDLCODE 


% 


966 


06/18/80 


PUBLIC 


CDATA 


% 


266 


05/27/80 


PUBLIC 


CDATA 


% 


266 


05/30/80 


PUBLIC 


CDATA 


% 


840 


07/23/80 


PUBLIC 


CDATA 


% 


266 


06/18/80 


PUBLIC 


CDATA 


% 


644 


06/18/80 


PUBLIC 


CDATA 


% 


182 


06/18/80 


PUBLIC 


CDATA 


% 


182 


07/11/80 


PUBLIC 


CDATA 


% 


2646 


08/20/80 


PUBLIC 


CDATA 


% 


2072 


08/20/80 


PUBLIC 


CDATA 


% 


1456 


06/18/80 


PUBLIC 


CDATA 


% 


658 


08/06/80 


PUBLIC 


CDATA 


% 


910 


09/11/80 


PUBLIC 


CDATA 


% 


700 


06/19/80 


PUBLIC 


CDATA 


% 


2366 


08/29/80 


PUBLIC 


CDATA 


% 


1974 


08/20/80 


PUBLIC 


CDATA 


% 


448 


08/08/80 


PUBLIC 


CDATA 


%* 


600 


09/04/80 


PUBLIC 


MDLCODE 


%* 


600 


09/04/80 


PUBLIC 


MDLCODE 


<h* 


500 


09/04/80 


PUBLIC 


MDLCODE 


%* 


500 


09/04/80 


PUBLIC 


MDLCODE 


%* 


400 


09/12/80 


PUBLIC 


MDLCODE 


%♦ 


2000 


09/11/80 


PUBLIC 


MDLCODE 


%♦ 


300 


09/12/80 


PUBLIC 


MDLCODE 


%♦ 


600 


09/11/80 


PUBLIC 


MDLCODE 


%* 


600 


09/04/80 


PUBLIC 


MDLCODE 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
PERIPHERAL TEST DRIVER (PTD) 



P3680 PTDTEST - PERIPHERAL TEST DRIVER 
The initial implementation of PTD (Peripheral Test Driver) has been released. 
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SORTMCP 

D3233 SORTMCP - TAPE WORK FILE 

SORT now checks to ensure that tape work files are assigned to tape units; if not, Error #76 is 
generated . 

Consequently, add the following to "SORT Error Messages" in the System Software Operational 
Guide Reference Manual, Vol. 1 (Form No. 5001563), Page ll-A-2: 

"76 

No tape work file was assigned to tape units." 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SORTMCP 



P3374 SORTMCP - PROTECTED DISK FILES USED AS SORT OUTPUT FILES 

SORT will now lock any output disk file with PROTECTION=PROTECTED and SAVEFACTOR=0 . 
Previously, this type of file was closed with RETAIN and would result in extra records when the 
sort caller did not open the file before exiting the block where the file was declared. 

P3624 SORTMCP - LARGE MEMORY SIZE SPECIFIED 

When an extremely large (>128K) amount of memory was specified for a SORT, and the size was 
sufficient to hold more than 32,768 records, the SORT would cause an INVALID OP fault in the 
COMPARE procedure. This no longer occurs. 
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DOCUMENT CHANGES NOTES (D NOTES) 
SOURCENDL 



D3 557 SOURCENDL - BLANK PATCH FIELDS 

Due to an operational problem that occurred during release Mark 30 PR1 , Mark 31 patches 1 
through 13 made it into SOURCENDL with blank patch id fields. The problem was a transient one 
caused by standardization of copyright notices and version cards, and will not recur. 

D3613 SOURCENDL - "ACIII/BDLC BTB" REQUEST 

Examples have been added for ACIII/BDLC back-to-back request sets with station, terminal and 
line definitions for both Two Way Alternate Switched and Two Way Simultaneous direct connect. 
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DOCUMENT CHANGES NOTES (D NOTES) 
SOURCENDLI I 



D3398 SQURCENDLII - " SOURCENDL I I " 

The Source NDLII program on the Mark 32 release is provided only as an example of how NDLII 
programs may be written. This example may be modified periodically to provide new or improved 
exampl es . 

D3602 SOURCENDLI I - IMPLEMENT "ASCII-APL" FOR "NSP" DATACOM 

The supplied source NDLII program includes an ALGORITHM and an EDITOR that APL uses for ASCII 
and ASCII/APL contention terminals. This request set (ALGORITHM and EDITOR) supports most of 
the features currently supported in APL' s NDL request set. It also supports the features 
required to use CANDE and Logical I/O (object program I/O). 

The main features are: 

A station can be in ASCII, APL bit-pairing, or APL type-pairing. The initial setting is in 
the station's declaration and can be modified during input by the control characters 
SI(ctrl-0)/SO(ctrl-N) to select ASCII/APL and DC3 (c t r 1 -S)/DC4(c t r 1-T) to select bit/type 
pa i r ing . 

- A station can be in half-duplex or echoplex (each character is transmitted back to the 
station after it is received). The initial setting is in the station's declaration and can 
be modified during input by the control characters DC1 (c t r l-Q)/DC2(c t r 1-R) to select 
ha I f/echo . 

- A station can optionally have software translation of lowercase letters into uppercase 
letters during input. The initial setting is in the station's declaration and can be 
modified during input by the control characters STX(c t r l-B)/ETX(c t r 1-C) to select 
translation/no translation. 

- A station can optionally have paging done by the request set. If selected, the page size is 
TERMINAL. PAGES I ZE and the message ".page." appears when a page is full. A carriage return 
continues output, a BREAK interrupts output, any other character is ignored. The option is 
selected in the station's declaration. 

- A station can optionally have tabs be simulated by spaces (pseudot abs ) . If selected, the 
tabsize is settable when talking to APL and is fixed at S otherwise. The option is selected 
in the station's declaration. 

A station can optionally have a delay occur after a linefeed, formfeed, and carriage return. 
If selected, the delay is 33 milliseconds after a linefeed, 500 milliseconds after a 
formfeed, and 90+2*cur sorpos i t i on milliseconds after a carriage return. The option is 
selected in the station's declaration. 

Fully supported functions used by APL are: 

My turn/your turn enforcement. 

Break on output and input detection. 

Optional use of uninterpreted output (selected in the station's declaration). 

The common functions required by CANDE and Logical I/O are supported. The prc-declared 
ASCII translate table is used when the station is in ASCII. In output, the SUB control 
character is not printed, and in input the STX, ETX, SO, SI, DC1 , DC2 , DC3 , DC4, LF, FF, BS , 
and CR control characters are not passed on to the host. Other control characters are not 
affected. 

Some features not supported are: 

CANDE control character substitution. The backspace, line delete, and line end characters 
cannot be changed from BS , DEL, and CR. 

Control messages to APL and Who-Are-You messages (containing ENQ, ctrl-E). 

- White space optimization. 

- Software setting of tabs on AJ630 and AJ832 terminals. 

- Use of TERMINAL. WRAPAROUND to avoid transmitting extra linefeed and carriage return. 

The AI. ORITHM is called "APL_ASCI I_ALG" and the EDITOR is called "APL_ASCI I_EDITOR" . This 
ALGORITHM can only use, and is only useable with, this EDITOR. 

The default station "APL„ASCI I_HARD" is for hardcopy ASCII/APL terminals and "APL_ASCI I_SCREEN" 
is for screen ASCII/APL terminals. The station " APL_AS_A_MCS " exists only to ensure that APL 
is declared as a mcs. 
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SYSTEST 

D3197 SYSTEST - "SYSTESTS" TAPE REORGANIZATION 

On Mark 32, XALGOL programs are disallowed; therefore, the XALGOL programs SYSTEST/LANG/XALGOL 
and SYSTEST/UTIL/DCPUTILITY have been removed from the SYSTESTS tape. Since 
SYMTEST/OFF/LMDCP2 , SYMTEST/OFF/PROCTRANS , and SYMTEST/OFF/DCPCLUSTER are source programs 
assembled by SYSTEST/UTIL/DCPUTILITY to create SYSTEST/OFF/LMDCP2 , SYSYTEST/OFF/PROCTRANS , and 
SYSTEST/OFF/DCPCLUSTER, these symbolics have been removed. Instructions for doing the compile 
have been removed from the corresponding documentation files. Only the objects 
SYSTEST/OFF/LMDCP2 , SYSTEST/OFF/PROCTRANS , and SYSTEST/OFF/DCPCLUSTER have been released. 

If the files that have been removed are required for any reason, the Mark 31 SYSTESTS tape must 
be used. 

For the Mark 32 release, the SYSTESTS tape has been reorganized into three tapes, as follows: 

SYSTESTS: Tests designed for machi ne- independent systems 

SYSTEST/DOCUMENTOR, SYMTEST/DOCUMENTOR . 
SYSTEST/UTIL/DKADDR , SYMTEST/UTIL/DKADDR . 
SYSTEST/UTIL/PKTEST, SYMTEST/UTIL/PKTEST. 
S YSTEST/UT I L/DECODER , S YMTEST/UT I L/DECODER . 
SYSTEST/ I 0/ = , S YMTEST/ I O/ = . 
SYSTEST/GMM/= , SYSTEM/MATGMM , 
SYMTEST/GMM/PROGRAMDOC . 
SYSTEST/PROC/= , SYMTEST/PROC/= . 
SYSTEST/TAPEHANDLER , SYMTEST/TAPEHANDLER . 

SYSTESTSMPX: Tests designed for multiplexor systems 

The SCR-related files: 

SYSTEST/SCR/= . 

SYSTEST/ESCR/= . 

SYSTEST/UTIL/SCRPATCH , SYMTEST/UTIL/SCRPATCH . 

S YSTEST/UT I L/ SCRTAPEAL I GN , 

SYli!TEST/UTIL/SCRTAPEALIGN . 

S YSTEST/UT I L/ SCANCONT , SYMTEST/UT I L/ SCANCONT . 

SYSTEST/UTIL/SCANCONTLOG , SYMTEST/UT I L/SCANCONTLOG . 

Files which use the MPX I/O error log as data: 
SYSTEST/UTI L/DKERRANAL , SYMTEST/UTI L/DKERRANAL . 
SYSTEST/UTIL/LOGMAPPER, SYMTEST/UTI L/LOGMAPPER, 
SYMTEST/UTI L/LOGMAPPERDOC . 

SYSTEST/UTI L/LOGSTR I PPER , SYMTEST/UT I L/LOGSTR I PPER . 
S YSTEST/UT I L/ SCANH I STORY , SYMTEST/UT I L/SCANH I STORY . 

The DCP related files: 

SYSTEST/DCP/= , SYMTEST/DCP/= . 

DOCFILE/DCP/=. 

SYSTEST/OFF/LMMM, SYMTEST/OFF/DCPLMMMDOC . 

SYSTEST/OFF/MMMM, SYMTEST/OFF/DCPMMMMDOC . 

SYSTEST/OFF/SMLM . 

S YSTEST/OFF/ SMMM . 

SYSTEST/OFF/LMDCP2 , SYMTEST/0FF/LMDCP2DOC . 

SYSTEST/OFF/ALLORD1&2 , S YSTEST/OFF/ ALLORDLM 1 - 8 , 

SYMTEST/OFF/DCPALLORDSDOC . 

SYSTEST/OFF/LMLOADER , SYMTEST/OFF/DCPLMLOADERDOC . 

SYSTEST/OFF/PROCTRANS , SYMTEST/OFF/PROCTRANSDOC . 

SYSTEST/OFF/DCPCLUSTER , SYMTEST/OFF/DCPCLUSTERDOC . 

SYSTEST/OFF/DCPHANDLER . 

SY STEST/UTI L/DCPHELPER . 

SY STEST/UT I L/DCPLOADER , SYMTEST/UT I L/DCPLOADER . 

Mi seel 1 aneous : 

SYSTEST/DOCUMENTOR, SYMTEST/DOCUMENTOR. 
SYMTEST/MDL3 /BAS ICSYS 1 , SYSTEST/MDL3 /TESTGEN . 
SYSTEST/TAPEHANDLER , SYMTEST/TAPEHANDLER . 
SY STEST/UT I L/RESHELPER , SYMTEST/UTI L/RESHELPER . 
SYSTEST/UTI L/ALLPEPCOPY, SYMrEST/UTIL/ALLPEPCOPY. 
S YSTEST/UT I L/MAKEONECARDLDR , 
SYMTEST/UTI L/MAKEONECARDLDR , 
SYMTEST/UTIL/ONECARDLOADERS . 
SYMTEST/DECK/ALL0RDPK/CD2 32000 8 2 , 
SYMTEST/DECK/ALLORDERS/CD19 146562 , 
SYMTEST/OFF/ALLORDLOADERDOC . 
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SYSTESTSLANG : Tests designed for languages 

SYSTESTSLANG/= 

SYSTEST/LANG/= , SYMTEST/LANG/= . 

SYSTEST/DOCUMENTOR , SYMTEST/DOCUMENTOR . 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 SYSTEST 



PAGE 467 
B6000 SERIES MARK 32 



DOCUMENT CHANGES NOTES (D NOTES) 
UDSTRUCTLTRE TABLE 



D3221 UDSTRCTTAB - "SYSTEMUSER" BIT MOVED 

On the Mark 31 release, a new bit was added to the userdatafile for Host Services. This bit, 
SYSTEMUSER, is used to allow or deny privileges when entering inter-system ODT commands. The 
location of this bit conflicts with a bit currently in use on B7000 series systems, CHARGEREQ. 
In order to resolve this conflict, the SYSTEMUSER bit is being moved. Sites that have not set 
the SYSTEMUSER bit for any of their users should disregard the remainder of this note. 

For sites that have set the SYSTEMUSER bit, the following procedure should be followed: 

a) Make sure that the 31 PR1 intrinsics are being used. 

b) Recompile any software that may reference the SYSTEMUSER b i t . SYSTEM/HOSTSERVICES is the 
only standard software that uses it. The 31 FR1 version has already been compiled. 

c) For users that currently have the SYSTEMUSER bit set, reset the CHARGEREQ bit. CHARGEREQ 
has been added to the B6000 series UDSTRUCTURETABLE to become compatible with the B7000 
series. 

d) Set the SYSTEMUSER bit for those users that had previously been given that distinction. 

D3 388 UDSTRCTTAB - CLASS LOCATOR 

Page 9-2-9 in the SOG Reference Manual, Volume 2, (Form No. 5001688), paragraph g, should be 
replaced by the following: 

"g. CLASS - CLASS is used to specify into which queue a job initiated by this user will 

go by default. A value of indicates the system default queue. Any other 

value indicates a queue number. Queue cannot be specified. « This field 
allows references to queues numbered 1 through 2SS." 

D3415 UDSTRCTTAB - NON INTERACTIVE "APL" 

The APL node is modified to support the non-interactive APL implementation. 

ADDED: MPCMAXSESSIONS, APLSESSIONCOUNT, APLMAX INTERACTIVE, 
APLMAXDETACHED. 

DELETED: APLMAXBKRNDWS , APLBKRNDWSCOUNT , APLMAXBKRNDACTIVE, 
APLBKRNDACT I VECNT , APLM I NKRNDCLAS S . 

D3477 UDSTRCTTAB - APL-DETACHED WORKSPACE 

The APL node has been modified to support further APL detached work space implementation, as 
fol lows : 

Ad d e d : APLTOTALUS AGERATE 
Deleted: APLMAXSESSIONS 
APLSESSIONCOUNT 
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DOCUMENT CHANGES NOTES (D NOTES) 
USERSTRUCTURE COMPILER 



D3445 USERSTRUCT - EXAMPLE OF BINDING "USERSTRUCTURE" 

The B7000/B6000 System Software Operational Guide, Volume 2 (Form No. 5001688), should be 
corrected as follows: On page 9-2-12, the example in section (b) should be replaced with the 
f ol 1 owi ng : 

"<i>BEGIN JOB COMPILE/UDSTRUCTURTABLE; 
<i>COMPILE SEP/UDSTRUCTURETABLE with USERSTRUCTURE; 
COMPILER FILE CARD(TITLE=SYNBOL/UDSTRUCTURETABLE 
ON DISK) ; 
<i>BIND NEW/INTRINSICS with BINDER= 
BINDER DATA 

HOST IS SYSTEM/INTRINSICS; 
BIND UDSTRUCTURETABLE FROM SEP/=; 
<i>END JOB" 

D3605 USERSTRUCT - NEW "UDSTRUCTURETABLE" GENERATION 

The handling of SYMBOL/UDSTRUCTURETABLE by the SYSTEM/USERSTRUCTURE compiler has been changed 
because of migration from intrinsics to support libraries. Stated simply, USERSTRUCTURE is no 
longer a compiler that generates a code file which must be bound into SYSTEM/INTRINSICS. 
USERSTRUCTURE now generates a symbolic patch which must be compiled into SYMBOL/GENERALSUPPORT . 
Details of the implementation are as follows: 

SYMBOL/UDSTRUCTURETABLE 

No changes have been made to this symbolic because of support libraries. No procedural 
changes have been made regarding the patching of this file. 

SYSTEM/USERSTRUCTURE 

a. This program is no longer a compiler and may no longer be invoked via a WFL or CANDE 
COMPILE statement. USERSTRUCTURE should not be MCed . 

b. The input file remains CARD; however, the default KIND is now PACK (rather than READER) 
and the default title is "SYMBOL/UDSTRUCTURETABLE". 

c. The output file is now PATCH (rather than CODE). The default title for this output file 
is "PATCH/GENERALSUPPORT/UDSTRUCTURETABLE ON DISK". This title can be changed via file 
attribute equation to any desired title. USERSTRUCTURE w i 1 1 set its TASKVALUE attribute 
to one if the patch was correctly generated; the TASKVALUE will be set to zero 
ot herwi se . 

d. The patch file generated by USERSTRUCTURE is properly sequenced and contains the correct 
$SET (and POP) VOIDT cards. No further editing is necessary. 

e. The following WFL job sequence can be used to parse the SYMBOL/UDSTRUCTURETBLE and 
compile the resulting patch into SYMBOL/GENERALSUPPORT. 

?RUN SYSTEM/USERSTRUCTURE; % wi 1 1 read SYMBOL/UDSTRUCTURETABLE 

% on DISK 

% will write PATCH/GENERALSUPPORT/ 
% UDSTRUCTURETABLE on DISK 
?RUN SYSTEM/PATCH; 

F I LE PATCH=PATCHDECK/GENERALSUPPORT ; 

DATA 
S.LIST P 
$#GENERAL 

SCLEAR LISTP MERGE LINEINFO 
$#GENERAL 

$ .FILE PATCH/GENERALSUPPORT/UDSTRUCTURETABLE 
. . . other GENERALSUPPORT patches . . . 
'COMPILE SYSTEM/GENERALSUPPORT WITH NEWP; 

NEWP FILE CARD=PATCHDECK/GENERALSUPPORT; 

NEW FILE TAPE= SYMBOL/GENERALSUPPORT; 

Existing documentation is affected by this change as follows: 

SOG Reference Manual, Volume 2: 

Chapter 9 - MAKEUSER: 

Page 9-2-12; Modifying UDSTRUCTURETABLE 

Chapter 14 - Software Compilation 
Page 14-2-5; USERSTRUCTURE 
Page 14-2-6 through 14-2-7; Compile and Bind Intrinsics 
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USERSTRUCTURE COMPILER 

P35 83 USERSTRUCT - USE "LONG" ARRAY MASKSEARCH 

USERSTRUCTURE will now use a LONG array to hold the information it is bu i Id ing whi 1 e syntaxing 
the UDSTRUCTURETABLE, thus allowing the program to work correctly when this internal array 
becomes larger than 255 words. 
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UTILITY LOADER 



D3332 UTILOADER - "UTI LOADER" ON "MLIP" SYSTEMS 

UTILOADER for MLIP systems resides on the BDSUTILITY tape and is loaded by the MDP. The 
program UTILOADER functions much the same as it did on MPX systems, except that operator input 
is via the ODT instead of cards. UTILOADER can perform the following functions: 

1. Halt/Load the processor from a pack to which CM has previously been done (there is an MCP 
and a bootstrap pointing to it). 

2. Tape load a standalone program from a Library Maintenance tape. 

3. Display configuration information. 

When the initial message appears on the ODT, UTILOADER expects the operator to enter either 
"HALTLOAD", "TAPELOAD" or "CONFIGURATION". 

If HALTLOAD is entered, UTILOADER prompts the operator with the message: 

"ENTER INPUT REQUEST IN THE FOLLOWING FORM: 
PK VW OR PK VVV VIA PORT # LEM PORT # DLP #" . 

UTILOADER expects the operator to specify the physical unit number of a pack that will be the 
"HALTLOAD UNIT DESIGNATE" (there are no pins). There are two means by which this unit can be 
specified: (a) use the first available path, (b) use a specified path. By specifying the "VIA" 
option, UTILOADER uses the path specified by the operator (port, lem port and DLP). In either 
case, UTILOADER checks to ensure the pack is ready, then passes control to the resident 
bootstrap. Since UTILOADER does not verify that there is an MCP and a bootstrap on the pack, 
the operator must ensure that the pack is one to which CM has previously been done. 

If TAPELOAD is entered, UTILOADER prompts the operator with the message: 

"ENTER INPUT REQUEST IN THE FOLLOWING FORM: 

FILENAME FROM VOLUMENAME ON MT VW VIA PORT # LEM PORT # DLP #" . 

The VIA part is optional (as with the HALTLOAD function). UTILOADER reads the volume label on 
the tape drive specified to verify that it matches, then checks the directory for the file to 
be loaded. When the file is read into memory, UTILOADER passes control to it. 

If CONFIGURATION is entered, UTILOADER displays all the DLPs on a base-by-base basis for all 
BASES and DLPs on the system in the following form: 

BASE 4/1/0 PATH: MLIP PORT 1, LEMPORT 
ADDRESS 1 DLPID 048 STANDARD HT (PACK) 
ADDRESS 2 DLPID 032 ODT 

BASE 3/1/0 PATH: MLIP PORT 2, LEMPORT 
ADDRESS 2 DLPID 001 TRAIN PRINTER 

The first line gives pertinent base information: 

BASE <baseid> PATH: MLIP PORT <port numbeo LEMPORT <lemport number>. 

Indented lines give DLP information of the form: 

ADDRESS <dlp address> DLPID <dlpid> <dlp type>. 

The <baseid> is the field strappable value that is returned from the Base Control Card (see 
CONFIGURATOR note D3406, "Soft Configuration", for details on base id). The <port number> and 
<lemport numbeo identify the host path into the base. The <dlp address> gives the relative 
address within a base of that DLP. <por tnumber> , <lemport number>, and <dlp address> are the 
input required for the VIA option to the HALTLOAD and TAPELOAD commands. The <dlpid> is the 
field strappable value that forms the base physical unit number of the peripherals connected to 
the DLP. The other 15 possible pack units are numbered sequentially, incrementing by one. The 
<dlp type> specifies the DLP type; e.g. ODT, PRINTER, MAGTAPE, etc. If there are multiple 
paths to a set of units, UTILOADER will arbitrarily pick the first path (i.e. the path listed 
first) listed; if a different path is desired, the VIA option must be used. 

The CONFIGURATION command expects no input. 
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D2429 WFL - "NEW" WFL SYNTAX CLARIFICATION 

WFL system notes that discuss syntax refer to "new" Mark 29 syntax as described in Mark 29 WFL 
note D2077. Any other level of syntax will be explicitly described. 

D3008 WFL - "INSTRUCTION" STATEMENT 

The following examples should be added to the INSTRUCTION statement examples on Page 8-23 of 
the WFL Reference Manual (Form No. 5001555). The Example section should follow the Semantics 
sect i on . 

"INSTRUCTION 2 MOUNT TAPE TEST3 . 

7BEGIN JOB COMPILE/TESTS; 

FAMILY DISK = USERS OTHERWISE DISK; 

INSTRUCTION 1 TESTTAPE IS IN TAPE RACK 3.; 

COPY&COMPARE = FROM TESTTAPE TO USERS (PACK); 

INSTRUCTION 2 IF T17 OR T17A WERE NOT COPIED FROM TESTTAPE TO 

USERS, PLEASE DS THIS JOB AND LEAVE JK A NOTE. ; 
COMPILE TEST/ 17 ALGOL; 

ALGOL FILE CARD(TITLE=T17 , KIND=DISK) ; 
FILE F(TITLE=T17A); 
IF FILE TEST/17 ISNT RESIDENT THEN ABORT "**BAD COMPILE**"; 
?END JOB. 

During execution of the COPY statement in the above job, the sys tern wi 11 need tape TESTTAPE. 
If the operator asks for the most recent ins tract ion, instruct ion lwi 1 1 be displayed, 
indicating where TESTTAPE can be found. Later, the job will need files T17 and T17A An 
instruction request at this point will display instruction 2, with instructions on what to 
do if T17 and T17A are not present." 

The description of the INSTRUCTION statement under "Semantics" on Page 8-23 of the WFL 
Reference Manual should be replaced with the following: 

"The INSTRUCTION statement is used to supply job instructions to operators. Instructions 1 
through 63 may be specified. 

As a WFL job executes, any INSTRUCTION statements encountered are stored in a table. As 
each INSTRUCTION statement is found, it is marked as the "most current instruction until 
another one is found. At any point during the job's execution, the operator may display any 
individual instruction by number, via the IB (Instruction Block) ODT message. Ifthe 
operator does not specify an instruction number, the system will display the most current 
ins t ruct ion . " 

D329 3 WFL - REMOTE JOB TRANSFER 

If a iob is intended to be sent to a remote host ( " ?AT <hostname>" before BEGINJOB) it must 
not contain BCL or binary data decks. Any occurrence of a BCL or binary deck will cause the 
following syntax error: 

"BCL OR BINARY DECK NOT ALLOWED IN REMOTE JOB TRANSFER" 
D329 5 WFL - DATA BASE EQUATION ALLOWED 

Data base equation statements may now be included in WFL job decks. The form is the same as 
the format for file equation statements. 

Ex amp 1 e : 

DATABASE TESTDB(TITLE=MYDB) ; 

D3296 WFL - "BCL" WARNING 

WFL will now display the following warning whenever a BCL deck is used: 

"BCL CARD DECKS ARE NOT PORTABLE TO EBCDIC MACHINES" 

D3351 WFL - FILE EQUATION 

Page 6-7 of the WFL Reference Manual (Form No. 5001555), should be changed as follows: 

Insert the following paragraph between the second and third paragraphs of the "Semantics for 
File Equat ion" : 

"If the object program to which a <file equation> is applied opens a file whose INTNAME 
is <intname>, the <file attribute assignments which are specified in the <file 
equation> are merged with the attributes specified in the program. If the same 
attribute is specified in both the <file equation) and in the program, the <file 
attribute assignment which is specified in the <file equation) takes precedence. If a 
file which is file equated is not opened by the program, the <file equation) has no 
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effect . 

D3 361 WFL - SEGMENT CODE FILES 

WFL now starts using a new code segment at the beginning of a subroutine declaration or at the 

beginning of the main body of executable statements if its current code segment has a large 

amount of code already in it. Consequently, any WFL job which would have extended past the end 
of a segment can now be broken into subroutines, to execute in multiple segments. 

D3512 WFL - OPTIONS ATTRIBUTE WITH "# <STRING PRIMARY>" 

The following may be used to specify the <task option list> in the <task attribute assignments 

— # — <string primary> — | 

Syntax : 

OPTION = — <task option list > — | 

|- OPTIONS -I 

When this version of the <task option list> is used, the value of <string primary> should not 
contain parentheses. 

Example of Proper Use: 

STRING ; 

S:="LONG, FAULT"; 
RUN X; 
OPTIONS=#S ; 



D3513 WFL - "INSTRUCTION" STATEMENT SYNTAX 
The following is the correct syntax specification for the INSTRUCTION statement: 

I <; I 

— INSTRUCTION — <integer constant> /1500\ <string char> | 

A default value of <integer constant) is not provided; thus, a syntax error will result if not 
spec i f i ed . 

D3514 WFL - MNEMONIC FILE ATTRIBUTES 

WFL only allows <file mnemonic primary>s to be used with <mnemonic file attributes. 
<arithmetic expressions are not allowed. 

D35 18 WFL - STRING RETURNS ABSOLUTE VALUE 

On Page 4-10 of the WFL Reference Manual (Form No. 5001555), the following sentence is 
incorrect : 

"The STRING function generates a new string whose value is the decimal representation of the 
value of the first <integer expression)." 

The sentence should read as follows: 

"The STRING function generates a new string whose value is the decimal representation of the 
absolute value of the first integer expression." 

D3525 WFL - "HISTORY" SUBFIELDS ARE OF TYPE MNEMONIC 

The HISTORY <task attribute) is of type real; its subfields are of type mnemonic (not real, as 
stated in the WFL Reference Manual, Form No. 5001555). Numeric values may not be used. 
Furthermore, the proper mnemonic values for HISTORYTYPE and HISTORYCAUSE are the following: 

HISTORYTYPE: HISTORYCAUSE: 



NORMALV OPERATORCAUSEV 

DUMPINGV PROGRAMCAUSEV 

QTEDV RESOURCECAUSEV 

STEDV FAULTCAUSEV 

DSEDV SYSTEMCAUSEV 

NORMALEOTV DCERRV 

SYNTAXERRORV IOERRV 

UNKNOWNEOTV SOFT IOERRV 
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NEWIOERRV 

UNIMPLEMENTEDV 

UNSPECIFIEDCAUSEV 

EBDMSERRV 

NETWORKCAUSEV 

D3 528 WFL - IMPROVED HANDLING OF " $ INCLUDE" IN HEADINGS 

The Mark 31 initial system release of WFL closed a potential security problem by disallowing a 
SINCLUDE record from appearing within the heading of a job. 

This solution has been overly restrictive; SINCLUDE may again be used within the heading of a 
WFL job. The following restrictions apply: 

Ei ther 

(1) the file being INCLUDEd must be "PUBLIC IO" or "PUBLIC IN". 

or 

(2) the file being INCLUDEd must have the same usercode as the disk job symbolic file that 
contains the SINCLUDE record. 

These two restrictions will still allow jobs entered through a card reader or an ODT to INCLUDE 
any public file and will continue to allow STARTed and ZIPed jobs to SINCLUDE job heading 
information from other files with the same usercode as that with which the job symbolic itself 
i s stored . 



file security rules for SINCLUDE wi thin the main body of a job (i.e., following the job 
ine) remain unchanged. Normal system file security measures are applied as if the WFL 
ilation were running with the usercode specification that occurred last in the job heading. 



The 

head 
comp 

D3 544 WFL - "COPY/ADD" STATEMENT 

The syntax specification for the COPY/ADD statement in the WFL Reference Manual (Form No. 
5001555) should be changed to read as follows: 













1- ADD — 1 


- & 

- AND -| 


COMPARE -I 


_ & CATALOG - 

- AND -1 |- BACKUP — 





>-<! ibmaint file list> 




The syntax specification for the COPY/ADD statement in the CANDE Reference Manual (Form No. 
5011398) should be changed to read as follows: 



COPY 
ADD - 



|- & — COMPARE -| |- & CATALOG - 

I- BACKUP — 

>-<l ibmaint file list> 
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D3547 WFL - "LOCKED" IN TASK ATTRIBUTE ASSIGNMENT 

WFL does not allow the use of the LOCKED <task attribute> in a <task attribute as s i gnment > . 

D3580 WFL - PASSING STRINGS VIA "WFL/CANDE" 

When WFL or CANDE pass a string to a program as a parameter, they use a word array just large 
enough to hold the string plus one null character. If the declaration of the parameter in the 
receiving program is longer than the size of the string passed by WFL, a run-time error may 
occur . 

Such run-time errors do not occur on the Mark 30 release, because WFL at that time copied the 
string into a 256-charac ter array before passing it to a program. Thus, WFL was erroneously 
allocating too much stroage for the string. This was an oversight which was corrected on the 
Mark 31 release; it is now implemented as intended. 

D3581 WFL - "COPY/ ADD" STATEMENT WITH TAPE VOLUMES 

The same tape volume may not be used in more than one FROM clause in the same COPY/ADD 
s t a t emeu t . 

D3584 WFL - "FILEKIND" EXAMPLE 

The example on Page 4-11 of the WFL Reference Manual (Form No. 5001555) which reads as follows: 

IF F(FILEKIND) = #(S&"SYMBOL#) THEN . . . 
should read as follows: 

IF F(FILEKIND) IS #(S&"SYMBOL" ) THEN . . . 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 WORK FLOW LANGUAGE 



PAGE 475 
B6000 SERIES MARK 32 

SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
WORK FLOW LANGUAGE 

P2747 WFL - CORRECTLY COMPARE FILE AND TASK ATTRIBUTE 

Previously, a WFL job would get an INVALID OP when a #<string primary> was used as a file or 
task mnemonic primary in a file or task mnemonic comparison. WFL now works as documented; it 
will correctly execute jobs such as the following: 

7BEGIN JOB FILECOMP; 

STRING S; 

FILE F(KIND=DISK); 

S ■ ="DISK" ■ 

IF F(KIND) IS #S THEN DISPLAY "SAME"; 
?END JOB. 

P2748 WFL - JOB ON DISK WITH "NEWSOURCE, SYNTAX" 

Previously, a job entered at a card reader with NEWSOURCE and SYNTAX specified would be 
compiled for syntax and placed in a disk file. Subsequent attempts to execute the job would 
result in a compile for syntax; the job would not executed. 

The WFL compiler now assumes that if a job residing on disk contains a NEWSOURCE specification, 
it should be executable, so WFL will ignore any syntax specification which may be present. 

P2749 WFL - PASS GLOBAL FILES TO PROCESSED SUBROUTINE 

Previously, a global disk file passed as a parameter to a processed subroutine would get an 
INVALID INDEX in the MCP. Global files passed as parameters to a processed subroutine are now 
handled correctly. 

P3263 WFL - TASK PASSED AS BY REFERENCE PARAMETER 

WFL was not passing tasks as by-reference parameters correctly. This would usually result in 
an INVALID OP upon execution. This problem has been corrected. 

P3520 WFL - MISSING COMMA IN "ON" STATEMENT 

WFL now handles properly a missing comma in the ON statement. Previously, the following 
statement would not cause a syntax error: 

ON TASKFAULT 
BEGIN 

<s t at cinent 1 i s t> 
END; 

As a result of the above statement, the compiler no longer generates code equivalent to the 
fol lowing : 

ON TASKFAULT; 
BEGIN 

(Statement list> 
END; 

P3584 WFL - FAMILY SPECIFICATION, " <NAME CONSTANT> " 

WFL will now accept any legal <name constant> as a <family name> in a FAMILY specification and 
as a <usercode> in file titles. Previously, the following statements would cause syntax 
errors . 

FAMILY 123A=456B OTHERWISE 567C; 

COPY (321Z) FILEA FROM A TO B; 

P3623 WFL - PREVENT "WFL" FAULT 

The WFL compiler no longer faults if, while parsing a file equation list, a standalone mnemonic 
is encountered immediately after an assignment using #<strmg pnmary>; e.g., FILE 
X(TITLE=#S,DISK); . 

P3695 WFL - SYNTAX "OLD" WFL DATA BASE, LIBRARY 

Pre-2.9 WFL now issues a syntax error when an attempt is made to use DATABASE equation or 
1 ibrary equa t i on . 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
XREF ANALYZER 



P3147 XREFANALY - ADD "DATABASE" AS "XREF" ITEM 

Data bases declared in BDMSALGOL programs will now be properly referenced by the XREFANALYZER 
and INTERACT I VEXREF. 

P3332 XREFANALY - REMOVE "PORT, SIGNAL" VARIABLE TYPES 

The ALGOL variable types PORT, PORT ARRAY, SIGNAL and SIGNAL ARRAY are no longer supported. 

P3518 XREFANALY - CORRECTLY IDENTIFY "CHARACTER" ARRAYS 

The XREFANALYZER will now correctly identify CHARACTER arrays rather than reading them as 
INTERFACE arrays. 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 XREF ANALYZER 



PAGE 477 
B6000 SERIES MARK 32 

DOCUMENT CHANGES NOTES (D NOTES) 
DOCUMENTS 
D3607 DOCUMENTS - STACK SIZE FOR "ALGOL" COMPILE EXAMPLE 

and the BINDER is 2000. 

D3625 DOCUMENTS - FIND AT "< GROUP ITEM>" 

The following information should be inserted in the DMSII Host ^ MB ^ nc t he M ? nua ' (F ° rm N °" 
5001498), on Page 13-2, following "case d of "IF <dat a-i t em-l> is NUMBER, then . 

"If <^ta;it« m -l> n s a d G R ^; s * h ^ 0UP item uti ,i«e an odd number of 4-bit digits, the group 
^ s Da" ddid with a one-oig? filler containing the value all bits on. If <data-i tem-2> is 

a GROUP item in the program, it must contain a corresponding one-d.git filler with the 

value all bits on. " 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - SCR/7ABMTEST 



P3377 7ABMTEST - COUNT "READ" AND "WRITE" ERRORS 
Previously, READ and WRITE errors were not included in the total error count; now, they are. 
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SOFTWARE IMPROVEMENTS NOTES (P NOTES) 
SYSTEST - UTIL/RESHELPER 



P3394 RESHELPER - ALLOW RUNS FOR DISK PACK TYPES "206,207" 
SYSTEST/UTIL/RESHELPER now runs for disk pack types 206 and 207. 
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B6000 SERIES PATCH TABLE (PATCH CLOSING FTRS MARKED WITH '*') 
SOFTWARE PATCH PRI NOTE DESCRIPTION 

INQ CREATE/DELETE 
System Serial Number Added 
Remove RSFILE Declaration 
Efficient Pack Space Utilizati 
Audit File Error Handling 
Count Finds Against Index Sets 
Simplification of REORGANIZATO 
Flush Buffers for Structure 
Do Not Set Inuse Flag 
DS of "SECTORS REQUIRED" Vs. R 
Audit Restart Information Corr 
Statistics Interface 
Buffers Moved to Data Base Env 
Immediate Overlay of Buffers 
Allow AUDIT CLOSE Message 
Clear TPS Information 
Divest Compact Table Block if 
ZERO DISK ADDRESS for Direct D 
Quick Fix Creates Empty Audit 
Reuse Empty audit Correctly 
RECONSTRUCT Makes Empty Audit 
Display Reason for Not Reusing 
Unlock Partition i f DS in Open 
New Data Base Stack Structure 
Data Base Messages 
Remove Properties for 27 Links 
INVALID OP With Readahead 
Shared ACCESSROUTINES , Data Ba 
Bad Available Tables for Compa 
Data Base Subsystem Visible 
Nested STARTDB Errors 
I/O Timeout 

READLOCKNOPURGE Removed 
Implement COPYAUDIT WFL Deck 
Interface to Free Stack Record 
Shared ACCESSROUTINES, Data Ba 
Nested STARTDB 

ACCESSROUTINES Error Messages 
Corruption of Compact Data Set 
ACCESSROUTINES Error Messages 
Control File I/O Lock 
Fault on Reblocked Standard Da 
Rebuild Across File Dtscontinu 
B7700CODE Option 
Deleting Variable Format Recor 
Totalcore Protected by Memlock 
Prevent COPYAUDIT Zip Delay 
Forced, Normal Overlays 
Graph for Data Base Users 
Abort Acceleration 
Data Base Stack 
ACCESSROUTINES Error Messages 
Print Statistics Option 
ERROR IN DCB HANDLING 
DBS INFO Replaces MYNUMBER 
Normal Vs. Direct Files as Par 
Missing Divest on Deadlock 
Erroneous BIO/AIO Audit Record 
Save and Retrieve Messages 
DCB Handl ing Error 
Bad Links When Open Inquiry 
Links on Select Text Error 
Invalid INQUIRY Function Numbe 
Store Restart Area 
Preal locat ion of Direct Data S 
Standard VF Control Word Corru 
Prea 1 locat ion of Direct Data S 
Do Not Point Links at Overflow 
Missing Divest Following Versi 
Forget Subblock for Ordered Da 
Zeroed Out Blocks in Data Base 
Preal locat ion of Direct Data S 
Preal locat ion of Direct Data S 
Partition Open Error 
Invalid Direct Data Set 
Invalid Standard Variable Form 
Partition Audit Records Out of 
Linear Search with Signed Nume 
Cancel or Complete I/O Followi 
DMSECURITYERROR 
FORGETSPACE Timing Window 
Ordered Data Set Divest Error 



ACR 


32.0.0024 


37073 D3171 


ACR 


32.0.0026 


37219 P2752 


ACR 


32.0.0027 


37351 P2753 


ACR 


32.0.0028* 


' 37210 P2499 


ACR 


32.0.0030 


37343 P2754 


ACR 


32.0.0032 


37322 D3044 


ACR 


32.0.0033 


37540 D3084 


ACR 


32.0.0044* 


38013 P2755 


ACR 


32.0.0046 


38012 P2756 


ACR 


32.0.0047 


38020 P2633 


ACR 


32.0.0048 


37530 P2632 


ACR 


32.0.0052 


38110 D3045 


ACR 


32.0.0053 


38109 D3046 


ACR 


32.0.0055 


38118 P2757 


ACR 


32.0.0057 


38128 D3047 


ACR 


32.0.0059 


38037 D3052 


ACR 


32.0.0061 


38190 P2788 


ACR 


32.0.0062 


38199 P2882 


ACR 


32.0.0063 


38207 P2883 


ACR 


32.0.0064* 


38213 P2885 


ACR 


32.0.0065 


38214 P2886 


ACR 


32.0.0066 


38125 P2948 


ACR 


32.0.0068* 


38120 P2949 


ACR 


32.0.0069 


38197 D3108 


ACR 


32.0.0070 


38137 P2964 


ACR 


32.0.0071 


38134 D3118 


ACR 


32.0.0072* 


38761 P2950 


ACR 


32.0.0073 


38011 D3170 


ACR 


32.0.0074* 


38752 P3003 


ACR 


32.0.0075 


39188 P3033 


ACR 


32.0.0076 


39189 P3030 


ACR 


32.0.0077 


39195 P3031 


ACR 


32.0.0078* 


37723 P3071 


ACR 


32.0.0079 


38762 D3270 


ACR 


32.0.0080 


39367 P3106 


ACR 


32.0.0081 


38011 D3170 


ACR 


32.0.0082 


39388 P3101 


ACR 


32.0.0083 


39356 D3331 


ACR 


32.0.0084* 


39620 P3145 


ACR 


32.0.0085 


39356 D3331 


ACR 


32.0.0086 


39642 P3175 


ACR 


32.0.0087* 


39658 P3176 


ACR 


32.0.0088 


39639 D3314 


ACR 


32.0.0089* 


39664 D3306 


ACR 


32.0.0090* 


39668 P3230 


ACR 


32.0.0091 


39669 P3177 


ACR 


32.0.0093* 


39900 P3178 


ACR 


32.0.0094 


39905 D3315 


ACR 


32.0.0095 


39906 P3179 


ACR 


32.0.0098 


39910 D3452 


ACR 


32.0.0099 


39981 D3337 


ACR 


32.0.0100 


39356 D3331 


ACR 


32.0.0102 


39989 D3338 


ACR 


32.0.0104 


40198 P3246 


ACR 


32.0.0105 


40200 P3247 


ACR 


32.0.0106 


40203 P3258 


ACR 


32.0.0112* 


40221 P3259 


ACR 


32.0.0113 


40220 P3393 


ACR 


32.0.0114 


40231 D3366 


ACR 


32.0.01 15* 


40492 P3284 


ACR 


32.0.01 16 


40234 P3312 


ACR 


32.0.0117* 


40239 P3313 


ACR 


32.0.0118 


40506 P3314 


ACR 


32.0.0120* 


40516 P3333 


ACR 


32.0.0121 


40887 D3460 


ACR 


32.0.0122* 


40522 P3340 


ACR 


32.0.0124 


40887 D3460 


ACR 


32.0.0125* 


40889 P3368 


ACR 


32.0.0126* 


40893 P3369 


ACR 


32.0.0127* 


40886 P3370 


ACR 


32.0.0128* 


40902 P3371 


ACR 


32.0.0129 


40887 D3460 


ACR 


32.0.0130 


40887 D3460 


ACR 


32.0.0131* 


40928 P3383 


ACR 


32.0.0134* 


41358 P3486 


ACR 


32.0.0137* 


41387 P3553 


ACR 


32.0.0138* 


41386 P3554 


ACR 


32.0.0141* 


41782 P3606 


ACR 


32.0.0143* 


41778 P3618 


ACR 


32.0.0144 


41805 P3696 


ACR 


32.0.0146* 


41813 P3773 


ACR 


32.0.0147* 


41810 P3683 i 
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SOFTWARE PATCH PRI NOTE DESCRIPTION 



\CR 
,-ACR 
ACR 
ACR 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 
ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

.ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOL 

ALGOLINTRN 

ALGOLINTRN 

ALGOLINTRN 

ALGOLINTRN 

ALGOLTABLE 

ALGOLTABLE 
ALGOLTABLE 
ALGOLTABLE 
ALGOLTABLE 
ALGOLTABLE 
ALGOLTABLE 



32.0 

32.0 

32.0 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 



32 

32 

32 

32 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 



32. 

32 

32 

32 

32 

32 

32 



32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 



32 
32 



32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 



32.0 

32.0 

32.0 

32.0. 

32.0. 

32.0. 

32.0. 



32 
32 
32 



32.0 



.0148 
.0149* 
.0153* 
.0155* 
.0008 
.0009 
.0014 
.0015 
.0016 
.0018* 
.0019 
.0020 
0022 
0027 
0029 
0030 
0031 
0032 
0033 
0034 
0035 
0036 
0037 
0038 
0040 
.0041 
0044 
.0045 
.0046 
.0058 
.0059 
.0066 
.0067 
.0068 
.0070 
.0080 
.0083 
.0084* 
0085* 
0086 
0087 
0088* 
0089* 
0091* 
0092* 
0093 
0094 
0097 
,0099* 
.0100 
.0104 
0107 
0108* 
0109* 
0110 
0111* 
0113* 
0114 
0115 
0117* 
0118 
0120* 
0122* 
0125* 
0126 
0127 
0129 
0130 
0131 
0132 
0134 
0002* 
0003 
0004« 
0005* 
0003 
0006 
0007 
0008 
0012 
0014 
0016 



41394 P3697 Fail to Divest 

41395 P3708 Infinite Loop 
42316 P3755 NOTLOCKED Exception 

42320 P3789 Cannot Locate Compact Record 
34517 P2724 Strings as Attributes, TR Item 
34516 D3009 STRING Expressions in WRITE an 
38188 D3090 Compiler Info Word in Seg Zero 

37419 D3062 Longer Strings with Implicit C 

37420 D3063 Events, Event Arrays as Librar 
37417 P2903 Internal Arrays Expanded 
38197 D3108 New Data Base Stack Structure 
38197 D3108 New Data Base Stack Structure 
37416 P2916 Code Optimization Corrected 
37419 D3062 Longer Strings with Implicit C 
39226 D3211 Give Warning for INTMODE=BCL 
37312 D3363 Remove SIGNAL and RESPONSE 
39228 D3266 Allow LONG As Key Word 

37312 D3363 Remove SIGNAL and RESPONSE 
38541 P3037 Incorrect Sign for Complex Exp 
38540 P3038 Invalid Assignments Not Flagge 
38539 P3039 Complex Expressions 
38538 P3040 Erroneous Syntax Error with Co 
39284 P3041 Incorrect Software Control Wor 
38543 D3269 Binary I/O for Strings 

39232 P3091 INVALID OP with Long Export Li 

39233 P3092 INVALID INDEX with Lex Levels 

39287 P3154 INVALID OP, Indexed String Arr 

39288 P3155 INVALID OP for String Expressi 

39234 P3139 Correct XREF Output for Librar 
39243 D3349 Set SNOBINDINFO 

39255 D3350 Flag SNOBINDINFO 

39881 D3360 Modifications to Support Portf 

39881 D3360 Modifications to Support Portf 

39881 D3360 Modifications to Support Portf 

39881 D3360 Modifications to Support Portf 

39247 P3324 Multiple ELSE Clauses in CASE 

39243 D3349 Set SNOBINDINFO 

40945 P3798 Locking Code File 

40947 P3661 Give Error for Spaces within N 

39228 D3266 Allow LONG As Key Word 

39228 D3266 Allow LONG As Key Word 

40953 P3406 Prevent INVALID INDEX 

40961 P3407 Call BLOCKEXIT to Deallocate B 

40954 P3408 INVALID INDEX 

40955 P3409 ACCEPT "(<string variablo)" 
39228 D3266 Allow LONG As Key Word 
40551 D3471 Allow Longer Value Arrays 
41120 P3410 Making Use of Available Space 

41123 P3411 Intrinsic as a Name Parameter 

41124 P3412 Picture as a Formal Parameter 
41128 P3413 CTPROC, CTDEFINE Vs. Parameter 

41307 P3414 Complex Times Real Multiplicat 

41308 P3415 Clear SCW Information 

41309 P3416 String Pool Exceeded with SINT 
41238 P3417 Flag BCL Pointers with Offset 
40957 P3418 Long Character Arrays 

41573 P3463 Calling USERIOERROR for "MYSEL 
41498 P3526 Prevent Possible Stack Overflo 
40549 D3530 FUNCTIONNAME, LIBACCESS Attn 

41574 P3498 INVALID INDEX after Parameter 
41240 P3560 BCL Constructs Removed 
41577 P3532 Call Rese tpool s t r ings i ze 
41579 P3533 Corruption of Value Arrays 
42053 P3611 Global STRING PROCEDURE and Bi 

42051 P3625 Invalid I/O List Elements 

42052 D3626 Resizing EVENT ARRAYS 
42052 D3626 Resizing EVENT ARRAYS 

42240 D3633 "REAL (<pointer express ion>) " 
42235 D3610 Passing Files by Reference to 
42240 D3633 "REAL (<pointer express ion>) " 
42237 P3774 Missing BLOCKEXIT 
38243 P2940 Backup File Searching 
39826 P3298 CTOD Terminates Abnormally 

40657 P3325 Correct DSQRT Errors 

40658 P3326 Correct GAMMA, DGAMMA 

38197 D3108 New Data Base Stack Structure 
37312 D3363 Remove SIGNAL and RESPONSE 
38011 D3170 Shared ACCESSROUTINES , Data Ba 
39235 P3147 Add DATABASE as XREF Item 
39255 D3350 Flag SNOBINDINFO 
39881 D3360 Modifications to Support Portf 
39880 D3357 Remove PORT and SIGNAL 
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B6000 SERIES PATCH TABLE (PATCH CLOSING FTRS MARKED WITH '*•) 
SOFTWARE PATCH PRI NOTE DESCRIPTION 

39247 P3324 Multiple ELSE Clauses in CASE 

39243 D3349 Set SNOBINDINFO 

39228 D3266 Allow LONG As Key Word 

42052 D3626 Resizing EVENT ARRAYS 

42240 D3633 "REAL (<pointer expr ess i on> ) " 

40528 P3341 Prevent Sort Error #4 

41293 D3614 Eliminate OPEN INITIALIZE 

38663 D3076 APL File Atiribute 

39063 D3252 Semi dependent Tasks, VISIBILIT 

40986 D3425 Delete PORTS, SIGNALS 

40873 D3482 New Attributes Implemented 

42060 P3626 "ROWSIZE=504" for New Patch 

40403 P3327 BFILE Label Equation 

41062 D3587 HOSTNAME Modifier 

42113 P3658 "FILE. TITLE" Attribute 

38584 P2909 Processor Times Reported on Mo 

38583 P2910 Correct Swapcore Graphs 

38181 D2978 SYSTEM/BARS Utility 

38498 D3277 Virtual Memory Utilization Mea 

38499 P31J0 Incomplete Display on System O 
40106 P3251 Clear Channel Indicators Prone 
41467 P3464 SCREEN File Attribute 
41823 P3481 Changes to Type 4 SYSTEMSTATUS 
42094 P3642 "<more>" Displayed Completely 
42146 P3643 SPO Mode Displays Long Message 

42194 P3644 Negative IDLETIME 

42195 P3645 Single "." as Input 
38188 D3090 Compiler Info Word in Seg Zero 

42041 P3612 Error for DEF Function 
42040 P3622 Flag Question Mark as Invalid 
42046 D3603 Program of Up to 2048 Statemen 

42042 P3664 Error on First Program Token 
38011 D3170 Shared ACCESSROUTINES , Data Ba 
38011 D3170 Shared ACCESSROUTINES, Data Ba 
39235 P3147 Add DATABASE as XREF Item 
39240 D3324 Print Data Base Title 
40257 P3296 Transaction Record Parameters 
40882 D3440 Compiler Identification 
41580 D3552 Deimplement OPEN INITIALIZE 
35937 P2730 BDMSCOBOL Generates Bad Print 
38706 P2731 INVALID INDEX 

38011 D3170 Shared ACCESSROUTINES, Data Ba 
3 8011 D3170 Shared ACCESSROUTINES, Data Ba 
39444 P3085 Transaction Item, 1 or 2 Chara 
39479 D3325 Data Base Equation Information 
41756 D3555 OPEN INITIALIZE De impl emen t ed 
42010 P3588 Invalid Header 

42012 P3589 INVALID INDEX 

42013 P3590 INVALID INDEX 

42015 P3591 "DB-INVOKE" Hardly Readable 

42016 P3635 INVALID OP Accessing Global Da 
42033 P3636 Linear Search Selection Expres 
42026 P3803 "DUMP PRINTER (<da t ase t-name> ) 
41756 D3555 OPEN INITIALIZE De impl emen t ed 
42010 P3588 Invalid Header 

42012 P3589 INVALID INDEX 

42013 P3590 INVALID INDEX 

42015 P3591 "DB-INVOKE" Hardly Readable 

42016 P3635 INVALID OP Accessing Global Da 
42033 P3636 Linear Search Selection Expres 
38449 P2843 Transaction Items 

37882 P2844 Moving Data Base Items 

37883 P2845 XREF Option with BDMS 
37886 P2846 Incorrect BDMS OPEN Statement 

37893 P2847 Multidimensional DMS Arrays 

37894 P2848 Bu i 1 t i n Functions and BDMS 
37888 P2842 PL/I Compiler Looping 
38011 D3170 Shared ACCESSROUTINES, Data Ba 
39766 P3209 CREATE Statement 
39949 P3210 DATADICTINFO 

41641 D3556 OPEN INITIALIZE De impl emen t ed 
41332 P3595 Data Base BINDINFO 
41622 P3594 PUT EDIT of Data Base Items 
38241 D3414 Delete Old Intrinsics 
39145 D3158 Match NEWP Codefile level to B 
39280 P3010 Multiple Rebinds of SYSTEM/INT 

40557 P3328 Binding FORTRAN Routines 

40558 P3360 Correct SWAIT with <mix no.> O 
40995 P3419 Binding with "D[0]" Intrinsics 
40135 P3438 BINDINFO for Alternatives 

41229 D3487 MCP Code File Row Size = 504 

41230 D3495 Installation Intrinsic Warning 

B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 PATCHES 



ALGOLTABLE 


32.0.0018 


ALGOLTABLE 


32.0.0019 


ALGOLTABLE 


32.0.0020 


ALGOLTABLE 


32.0.0024 


ALGOLTABLE 


32.0.0025 


ARCHUPDATE 


32.0.0004 


ARCHUPDATE 


32.0.0005 


ATTABLEGEN 


32.0.0002 


ATTABLEGEN 


32.0.0006 


ATTABLEGEN 


32.0.0012 


ATTABLEGEN 


32.0.0015 


ATTABLEGEN 


32.0.0017 


BACKUP 


32.0.0011 


BACKUP 


32.0.0012 


BACKUP 


32.0.0014* 


BARS 


32.0.0001 


BARS 


32.0.0002 


BARS 


32.0.0004 


BARS 


32.0.0005 


BARS 


32.0.0006 


BARS 


32.0.0007 


BARS 


32.0.0008 


BARS 


32.0.0009 


BARS 


32.0.0010* 


BARS 


32.0.0011* 


BARS 


32.0.0012* 


BARS 


32.0.0013* 


BASIC 


32.0.0002 


BASIC 


32.0.0005* 


BASIC 


32.0.0006* 


BASIC 


32.0.0007* 


BASIC 


32.0.0008* 


BDMSALGOL 


32.0.0042 


BDMSALGOL 


32.0.0043 


BDMSALGOL 


32.0.0047 


BDMSALGOL 


32.0.0052 


BDMSALGOL 


32.0.0072* 


BDMSALGOL 


32.0.0082 


BDMSALGOL 


32.0.0123 


BDMSCOBOL 


32.0.0024* 


BDMSCOBOL 


32.0.0032* 


BDMSCOBOL 


32.0.0036 


BDMSCOBOL 


32.0.0037 


BDMSCOBOL 


32.0.0044 


BDMSCOBOL 


32.0.0048 


BDMSCOBOL 


32.0.0075 


BDMSCOBOL 


32.0.0087* 


BDMSCOBOL 


32.0.0088* 


BDMSCOBOL 


32.0.0089* 


BDMSCOBOL 


32.0.0090* 


BDMSCOBOL 


32.0.0092* 


BDMSCOBOL 


32.0.0093 


BDMSCOBOL 


32.0.0100 


BDMSCOBOL74 


32.0.0106 


BDMSCOBOL74 


32.0.0111* 


BDMSCOBOL74 


32.0.0112* 


BDMSCOBOL74 


32.0.0113* 


BDMSCOBOL74 


32.0.0114* 


BDMSCOBOL74 


32.0.0115* 


BDMSCOBOL74 


32.0.01 16 


BDMSPLI 


32.0.0011 


BDMS PL I 


32.0.0012* 


BDMSPLI 


32.0.0013* 


BDMSPLI 


32.0.0014* 


BDMSPLI 


32.0.0015* 


BDMSPLI 


32.0.0018* 


BDMSPLI 


32.0.0019* 


BDMSPLI 


32.0.0028 


BDMSPLI 


32.0.0042* 


BDMSPLI 


32.0.0043* 


BDMSPLI 


32.0.0062 


BDMSPLI 


32.0.0070* 


BDMSPLI 


32.0.0071* 


BINDER 


32.0.0003 


BINDER 


32.0.0005 


BINDER 


32.0.0006* 


BINDER 


32.0.0013 


BINDER 


32.0.0014 


BINDER 


32.0.0015* 


BINDER 


32.0.0016 


BINDER 


32.0.0017 


BINDER 


32.0.0019 
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B6000 SERIES PATCH TABLE (PATCH CLOSING FTRS MARKED WITH '•') 
SOFTWARE PATCH PRI NOTE DESCRIPTION 



UNDER 
JNA 
*BNA 
BNA 
BNA 
BNA 
BNA 
BNA 
BNA 
BNA 

BUILDINQ 
BUILDINQ 
BUILDINQ 
BUILDINQ 
BUILDINQ 
BUILDINQ 
BUILDINQ 
BUILDREORG 
BUILDREORG 
BUILDREORG 
BUILDREORG 
BUILDREORG 
BUILDREORG 
CANDE 
CANDE 
CANDE 
CANDE 
CANDE 
CANDE 
CANDE 
CANDE 
CANDE 
CANDE 
CANDE 
CANDE 
CANDE 

CANDE 

CANDE 

CANDE 

CANDE 
"CANDE 

CANDE 

CANDE 

CANDE 

CANDE 

CANDE 

CANDE 

CANDE 

CANDE 

CANDE 

CANDE 

CANDE 

CCTABLEGEN 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 

COBOL 
COBOL 
COBOL 
COBOL 
COBOL 
COBOL 
COBOL 
, COBOL 
COBOL 
COBOL 
COBOL 



32 0.0023* 41510 P3587 Binding Programs with SDATADIC 
32.0.0007 35594 D3012 Analyze IOCB 
32.0.0010 35594 D3012 Analyze IOCB 
32 0011 40663 D3356 New and Old ODT Messages 
32.0.0021 38069 D3102 BNA MCS 

32 0.0027 40663 D3356 New and Old ODT Messages 
32 0.0048 40663 D3356 New and Old ODT Messages 
32.0.0051 40663 D3356 New and Old ODT Messages 
32.0.0069 38790 D3281 Attribute Handling 
32.0.0308 41710 D3550 Eliminate DL Network 
42.0.0003 37073 D3171 INQ CREATE/DELETE 
■>',2 0007* 37723 P3071 READLOCKNOPURGE Removed 
1 I2. 0.0008* 39215 P3094 Renamed RESTART Data Set 
•"12.0.0009 39981 D3337 Data Base Stack 
'12. 0.0012 41296 P3706 Global Data in Logical Data Ba 
12.0.0013 41297 D3615 Segmented Value Arrays 
•12 0014 41298 P3698 Multiple Blocks in DMINQDIRECT 
32 V 0002 37320 D3120 DASDL/REORGANIZATION Enhanceme 
12 0003 37540 D3084 Simplification of REORGANIZATO 
■12 0005 38009 D3082 Implicit GENERATE Statements 
32.0.0006 38007 D3083 New Default for <sort options> 
(2.0.0007 38011 D3170 Shared ACCESSROUTINES , Data Ba 
32.0.0008 39981 D3337 Data Base Stack 
12.0.0007 37835 P2798 SCHEDULE Restart Problems 
32 0.0009* 37831 P2833 Missing SCHEDULE Output File 
32 0.0010 38597 D3104 XALGOL Deimpl ement ed 
32.0.0011 39111 D3249 VISIBILITY Task, SCATTER Run-T 
32 0.0012* 40013 P3200 Schedule Request on Unnamed Wo 
32 0013 40366 D3364 Automatic DESTNAME for CANDE S 
32.0.0015 40415 P3329 Missing SCHOUT File 
52.0.0016 41179 P3420 Secure Schedule Files Properly 
32 0017 41180 P3421 Allow Setting Chnrgecode to Nu 
32 0.0019* 41182 P3422 TAPE Command in IX) Files 
32.0.0020 41183 P3423 Recognize NDL Sequence Mode Te 
32.0.0021 41184 P3424 Security Problem 
32.0.0022 41185 P3425 CANDE Creates Bad Tankfile 
32.0.0023 41186 P3426 Schedule Sessions Vs. Chargeco 
32 0.0024* 40832 P3460 CANDE Errors Now Attributed to 
32 0.0025* 40833 P3499 Alow More than 2 Digits 
32.0.0026* 41487 P3500 CANDE DS for Security Violatio 
32.0.0027* 41685 P3501 Packname with Leading Digit 
32.0.0028* 41731 P3535 Backupprocessor Finding End of 



32 
32 
32 
32 
32 



0029 
0031 
0032 
0033* 
0034 
32.0.0035 
32.0.0036 
32.0.0038 
32.0.0039 
32.0.0040 
32.0.0001 
32.0.0010* 
32.0.0011 



41733 P3536 EOL Character in DO Statement 

41734 P3574 SEG ARRAY Error in DCWER 
41966 P3571 Folding Lower Case Tokens 
41732 P3613 Station Vs. Terminal Settings 
40663 D3356 New and Old ODT Messages 
42117 P3691 Handling Line Errors 
42418 P3692 END JOB on WFL Statement 
42457 P3785 Allow "4-Charac t er" Verbs 
42566 D3642 CANDE Vs. Foreign Tasks 
41913 D3646 Compiler Type FORTRAN77 
38055 D3123 B6900 Peripheral Test Driver 
37811 P2701 INVALID INDEX in COBOL Compile 
37810 P2702 USE Routine Not Invoked 

32! 6. 0012* 35960 P2703 VALUE (TERMINATED) 

32.0.0014* 37808 P2704 WAIT Statement 

32.0.0015* 37807 P2705 IF Statement Generates Bad Cod 

32 0.0016* 35961 P2706 Results of Exponentiation Impr 

32 0.0017* 35952 P2707 Bindinfo for 77 COMP Global It 

32.0.0018* 38151 P2708 Invalid Syntax for File Attrib 

32.0.0019* 38152 D3003 Binding and Statistics 

32.0.0020 38167 P2727 Compilation Summary 

32.0.0021* 38153 P2728 INVALID INDEX 

32.0.0022* 38154 P2729 NEWSEQERR $ Option 

32.0.0023 38188 D3090 Compiler Info Word in Seg Zero 

32.0.0025 38156 P2813 "OPEN O-I FILE1 1-0 FILE2" 

32 0.0027 38158 P2815 INVALID OP in IF Statement 

32 0028* 38176 P2834 Interaction of OPEN Statement 

32.0.0029 38160 P2835 STOP RUN 

38166 P2932 $ Options SEQERR, NEWSEQERR, S 
38178 P2732 Intrinsic Information in Globa 
39258 D3223 BCL Warnings 
32.6.0040* 39264 P3054 Call User Intrinsic 
32 0.0041 39265 P3055 INVALID INDEX in Report Writer 
32 0042* 39429 P3080 Indexed File with Invalid Key 
32.0.0043 39439 P3081 RERUN Clause 

32.0.0052* 40266 P3205 Calls on Untyped User Intnnsi 
32.0.0053* 40267 P3275 Group Computational Moves 
32.0.0055* 40269 P3274 Equal Comparisons 
32.0.0056* 40270 P3276 Erroneous Syntax Error 
32.0.0057* 40271 P3262 LIBRARY CALL Within IF 

B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 PATCHES 



32.0.0031 
32.0.0033 
32.0.0038 
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PAGE 484 



B6000 SERIES PATCH TABLE (PATCH CLOSING FTRS MARKED WITH '*') 
SOFTWARE PATCH PR I NOTE DESCRIPTION 

Syntax Error in IF Statement 

Modifications to Support Port 

Syntax Checking with NEXT SENT 

OBJECT-COMPUTER Clause Syntax 

ANSI 74 Default Line Spacing 

LINE NUMBER Clause Syntax 

MERGE Statement Syntax 

Long Conditional Expressions 

KEYSPERENTRY Greater Than 63 

INVALID INDEX 

Maximum Number of Libraries Ex 

Reserved Words Syntaxed in WRI 

INVALID INDEX with CP CALL 

Misalignment of "COMP-2" Sync 

SEGMENT Clause, 01 Record 

Timestamp Differences 

"COMP-2" Numeric Test 

ISAM External File Names 

COPY with Bad File Title 

ISAM CLOSE Options 

MONITOR, Write to Same File 

Operand Left on Top of Stack 

User Intrinsics at Levels "> 2 

INVALID INDEX in COBOL Compile 

VALUE ( TERM I NATED ) 

IF Statement Generates Bad Cod 

Results of Exponentiation Impr 

File Description Entry 

Compilation Summary 

INVALID INDEX 

SEQCHECK $ Option 

Compiler Info Word in Seg Zero 

INVALID OP in IF Statement 

SERIALNO Attribute 

Close for Multi-File Tapes 

Non-numeric Attributes 

STOP RUN 

"SOPTIMIZE" Compiler Error 

SIGN Clause for Computational 

$ Options SEQERR, NEWSEQERR, S 

BDMS Federal level Warning 

File At t r ibut es 

BCL Warnings 

INVALID INDEX in Report Writer 

WRITE AFTER ADVANCING PAGE Sta 

RERUN Clause 

Debug Line Values 

Debug Line Values 

Debug Line Values 

Debug Line Values 

WRITE Statement with FOOTING E 

Equal Comparisons 

Linage - Footing Value of One 

Syntax Error in IF Statement 

Modifications to Support Port 

Syntax Checking with NEXT SENT 

LINE NUMBER Clause Syntax 

Maximum Number of Libraries Ex 

Timestamp Differences 

COMPUTATIONAL Numeric Test 

File Handling Differences 

Library Pseudo Text Replacemen 

ARRAY TOO LARGE Error 

Soft Configuration 

SWAPPER Enhancements 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

Completed Entries Shows Spurio 

TERM USER Vs . AT HOSTNAME 

New and Old ODT Messages 

GETSTATUS/SETSTATUS Enhancemen 

" SUBSYSTEM= . " Vs. QFCorrectio 

New and Old ODT Messages 

New and Old ODT Messages 



COBOL 


32 


.0 


.0058* 


40272 


P3295 


COBOL 


32 


.0 


.0059 


40540 


D3359 


COBOL 


32 


.0 


.0060* 


40273 


P3294 


COBOL 


32 


.0 


.0061 


40274 


P3302 


COBOL 


32 


.0 


.0062 


40275 


P3303 


COBOL 


32 


.0 


.0063 


40276 


P3304 


COBOL 


32 


.0 


.0064 


40277 


P3305 


COBOL 


32 


.0 


.0065* 


40279 


P3306 


COBOL 


32 


.0 


.0066* 


40280 


P3307 


COBOL 


32 


.0 


.0067* 


40587 


P3427 


COBOL 


32 


.0 


.0072 


41531 


P3465 


COBOL 


32 


.0 


.0073* 


41532 


P3466 


COBOL 


32 


.0 


.0074* 


41533 


P3467 


COBOL 


32 


.0 


.0077* 


41538 


P3502 


COBOL 


32 


.0 


.0078* 


41539 


P3503 


COBOL 


32 


.0 


.0079 


41758 


P3525 


COBOL 


32 


.0 


.0080 


41542 


P3581 


COBOL 


32 


.0 


.0081* 


41544 


P3561 


COBOL 


32 


.0 


.0082 


41545 


P3562 


COBOL 


32 


.0 


.0083* 


41759 


P3538 


COBOL 


32 


.0 


.0084* 


41546 


P3559 


COBOL 


32 


.0 


.0085 


41547 


P3563 


COBOL 


32 


.0 


.0094 


40538 


P3679 


COBOL74 


32 


.0 


.0032* 


37811 


P2701 


COBOL74 


32 


.0 


.0033* 


35960 


P2703 


COBOL74 


32 


.0 


.0034* 


37807 


P2705 


COBOL74 


32 


.0 


.0036* 


35961 


P2706 


COBOL74 


32 


.0 


.0037 


35964 


D3010 


COBOL74 


32 


.0 


.0038 


38167 


P2727 


COBOL74 


32 


.0 


.0039* 


38153 


P2728 


COBOL74 


32 


.0 


.0040 


35996 


P3070 


COBOL74 


32 


.0 


.0041 


38188 


D309O 


COBOL74 


32 


.0 


.0046 


38158 


P2815 


COBOL74 


32 


.0 


.0049 


38171 


P2800 


COBOL74 


32 


.0 


.0052 


38172 


P2819 


COBOL74 


32 


.0 


.0053 


38175 


P2801 


COBOL74 


32 


.0 


.0056 


38160 


P2835 


COBOL 7 4 


32 


.0 


.0057 


38162 


P2851 


COBOL74 


32 


.0 


.0061 


38177 


P2931 


COBOL74 


32 


.0 


.0062 


38166 


P2932 


COBOL74 


32 


,0 


.0063 


38702 


P3395 


COBOL74 


32 


.0 


.0064 


38703 


P2937 


COBOL74 


32 


.0 


,0076 


39152 


D3224 


COBOL74 


32 





0080 


39265 


P3055 


COBOL74 


32 





0081 


39428 


P3060 


COBOL74 


32 


,0. 


0082 


39439 


P3081 


COBOL74 


32, 


,0. 


.0083 


39441 


P3084 


COBOL74 


32. 


.0. 


.0084 


39441 


P3084 


COBOL74 


32 


0. 


0086 


39441 


P3084 


COBOL74 


32. 


.0. 


0087 


39441 


P3084 


COBOL 7 4 


32. 


0. 


0089 


39430 


P3086 


COBOL74 


32. 


0. 


0099* 


40269 


P3274 


COBOL74 


32. 


0. 


0100 


40337 


P3308 


COBOL74 


32. 


0. 


0101* 


40272 


P3295 


COBOL74 


32. 


0. 


0102 


40541 


D3358 


COBOL74 


32. 


0. 


0103* 


40273 


P3294 


COBOL74 


32. 


0. 


0104 


40276 


P3304 


COBOL74 


32. 


0. 


0105 


41531 


P3465 


COBOL74 


32. 


0. 


0108 


41758 


P3525 


COBOL74 


32. 


0. 


0109 


41543 


P3564 


COBOL? 4 


32. 


0. 


0117 


42045 


D3597 


COBOL74 


32. 


0. 


0124 


42025 


P3826 


COMPARE 


32. 


0. 


0002* 


41464 


P3614 


CONFIGURATOR 


32. 


0. 


0001 


39337 


D3406 


CONTROLLER 


32. 


0. 


0001 


37702 


D3054 


CONTROLLER 


32. 


0. 


0003 


40663 


D3356 


CONTROLLER 


32. 


0. 


0005 


40663 


D3 3 56 


CONTROLLER 


32. 


0. 


0006 


40663 


D3356 


CONTROLLER 


32. 


0. 


0007 


40663 


D3356 


CONTROLLER 


32. 


0. 


0008 


40663 


D3356 


CONTROLLER 


32. 


0. 


0010 


40663 


D3356 


CONTROLLER 


32. 


0. 


001 1 


40663 


D3356 


CONTROLLER 


32. 


0. 


0012 


40663 


D3356 


CONTROLLER 


32. 


0. 


0014 


40663 


D3356 


CONTROLLER 


32. 


0. 


0015 


40663 


D3356 


CONTROLLER 


32. 


0. 


0016* 


39289 


P3045 


CONTROLLER 


32. 


0. 


0017* 


39038 


P3046 


CONTROLLER 


32. 


0. 


0018 


40663 


D3356 


CONTROLLER 


32. 


0. 


0020 


38795 


D3251 


CONTROLLER 


32. 


0. 


0021 


39727 


P3099 


CONTROLLER 


32. 


0. 


0025 


40663 


D3356 


CONTROLLER 


32. 


0. 


0027 


40663 


D3356 
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SOFTWARE PATCH PR I NOTE DESCRIPTION 
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CONTROLLER 


32. 


0. 


0029 


40663 


D3356 


CONTROLLER 


32, 


0. 


0031 


39526 


P3236 


CONTROLLER 


32. 


0. 


0032 


40663 


D3356 


CONTROLLER 


32. 


0. 


0034 


38795 


D3251 


CONTROLLER 


32. 


0. 


0035 


40102 


P3254 


CONTROLLER 


32. 


0. 


0036 


40663 


D3356 


CONTROLLER 


32. 


0. 


0039 


40663 


D3356 


CONTROLLER 


32. 


0. 


0042 


40663 


D3356 


CONTROLLER 


32. 


0. 


0043 


40663 


D3356 


CONTROLLER 


32. 


0. 


0044 


40663 


D3356 


CONTROLLER 


32. 


0. 


0049 


40663 


D3356 


CONTROLLER 


32. 


0. 


0054 


40057 


P3352 


CONTROLLER 


32. 


0. 


0057 


40663 


D3356 


CONTROLLER 


32. 


0. 


0061 


40663 


D3356 


CONTROLLER 


32, 


0. 


0064* 


41210 


P3428 


CONTROLLER 


32. 


0. 


0065 


40663 


D3356 


CONTROLLER 


32. 


0. 


0068* 


41462 


P3516 


CONTROLLER 


32. 


0. 


0069* 


41463 


P3517 


CONTROLLER 


32. 


0. 


0070 


41710 


D3550 


CONTROLLER 


32. 


0. 


0072 


40663 


D3356 


CONTROLLER 


32. 


0. 


0074* 


41941 


D3565 


CONTROLLER 


32. 


0. 


0080* 


42142 


P3659 


CONTROLLER 


32. 


0. 


0081 


40663 


D3356 


CONTROLLER 


32. 


0. 


0085* 


41689 


D3529 


CONTROLLER 


32. 


0. 


0087* 


42182 


P3750 


CONTROLLER 


32. 


0. 


0090 


40663 


D3356 


CONTROLLER 


32. 


0. 


0096 


42848 


D3647 


CONTROLLER 


32. 


0. 


0097 


42849 


D3651 


COPYAUD- 1 1 


32. 


0. 


0002* 


38760 


P2956 


COPYAUD- 1 1 


32. 


0. 


0003 


39981 


D3337 


COPYAUD- 1 1 


32, 


0. 


0005* 


40900 


P3384 


DASDL 


32, 


0. 


0013 


38699 


D3099 


DASDL 


32. 


0. 


0018 


37320 


D3120 


DASDL 


32. 


0. 


0020 


38011 


D3170 


DASDL 


32. 


0. 


0021 


38194 


D3048 


DASDL 


32. 


0. 


0022 


38211 


P2951 


DASDL 


32. 


0. 


0023 


38210 


D3113 


DASDL 


32. 


0. 


0027 


38215 


D3115 


DASDL 


32. 


0. 


0028 


38122 


D3116 


DASDL 


32. 


0. 


0029 


38011 


D3170 


DASDL 


32. 


0. 


0030 


38133 


P2952 


DASDL 


32. 


0. 


0031* 


38135 


P2953 


DASDL 


32. 


0. 


0032 


38134 


D3118 


DASDL 


32. 


0. 


0033 


38764 


D3117 


DASDL 


32. 


0. 


0034* 


38763 


P2967 


DASDL 


32. 


0. 


0035 


38759 


D3162 


DASDL 


32. 


0. 


0036* 


37723 


P3071 


DASDL 


32. 


.0. 


0037* 


39209 


P3072 


DASDL 


32. 





0038 


38762 


D3270 


DASDL 


32. 


.0. 


0039 


38011 


D3170 


DASDL 


32, 


.0 


0042 


39363 


D3272 


DASDL 


32, 


,0 


0043* 


39379 


P3102 


DASDL 


32 


.0 


.0044 


39380 


P3124 


DASDL 


32 





.0045 


39651 


D3316 


DASDL 


32 


,0 


.0046* 


39657 


P3231 


DASDL 


32 


,0 


.0048 


39675 


D3441 


DASDL 


32 


.0 


.0050 


39676 


P3181 


DASDL 


32 


,0 


,005 1 


39981 


D3337 


DASDL 


32 


.0 


.0052 


39983 


P3248 


DASDL 


32 


.0 


.0053* 


39621 


P3241 


DASDL 


32 


.0 


.0055 


40499 


P3315 


DASDL 


32 


.0 


,0056* 


40511 


P3342 


DASDL 


32 


.0 


.0057* 


40911 


P3385 


DASDL 


32 


.0 


.0058* 


40916 


P3386 


DASDL 


32 


.0 


.0061* 


41354 


P3442 


DASDL 


32 


.0 


.0062* 


41107 


P3487 


DASDL 


32 


.0 


.0063 


41773 


P3700 


DASDL 


32 


.0 


.0064* 


42314 


P3758 


DASDL 


32 


.0 


.0065* 


42322 


P3756 


DASDL 


32 


.0 


.0067* 


42698 


P3790 


DASDL 


32 


.0 


.0068 


42697 


P3793 


DATACOM 


32 


.0 


.0167* 


37852 


P2782 


DATACOM 


32 


.0 


.0169* 


37853 


P2783 


DATACOM 


32 


.0 


.0170* 


37854 


P2784 


DATACOM 


32 


.0 


.0180 


37856 


P2795 


DATACOM 


32 


.0 


.0226 


38512 


P2857 


DATACOM 


32 


.0 


.0322 


38774 


P2960 


DATACOM 


32 


.0 


.0676 


38795 


D3251 


DATACOM 


32 


.0 


.0690* 


40082 


P3229 


DATACOM 


32 


.0 


.0695 


38795 


D3251 


DATACOM 


32 


.0 


.0848 


38795 


D3251 


DATACOM 


32 


.0 


.1161* 


42305 


P3771 



New and Old ODT Messages 

Very Long File Names 

New and Old ODT Messages 

GETSTATUS/SETSTATUS Enhancemen 

BACKUPQUEUER Call 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

Multipage PER Display 

New and Old ODT Messages 

New and Old ODT Messages 

Missing "#" on ODT for Swaptas 

New and Old ODT Messages 

Hour Field in TIMEAT 

NS Cor rec t ion 

Eliminate DL Network 

New and Old ODT Messages 

J , MX Response 

AA Cor rec t ion 

New and Old ODT Messages 

PARTNER , EXCEPTIONTASK Remov 

PA Cor rec t ion 

New and Old ODT Messages 

TD Accel era t ion 

Suppress Frozen Libraries 

Print Tape Labels 

Data Base Stack 

Alphanumeric Usercodes 

Independence of DASDL UPDATE C 

DASDL/REORGANIZATION Enhanceme 

Shared ACCESSROUTINES , Data Ba 

Allow Link to Embedded Ds 

Allow Modulus Specification fo 

Delete READAHEADB 

COBOL Reserved Word Table Upda 

Put Subsystem ID in Text 

Shared ACCESSROUTINES, Data Ba 

Sequence Number not Updated 

SERIALBUFFERS Attribute 

Remove Properties for 27 Links 

Allow PROPERTIES Label Equatio 

AREASZ Greater Than 65536 Tru 

DASDL Defaults 

READLOCKNOPURGE Removed 

Keychanged Text for Field Item 

Implement COPYAUDIT WFL Deck 

Shared ACCESSROUTINES, Data Ba 

Restructure Description File P 

Set Up FILEKINDF, Packname Cor 

Superfluous Too Many Areas Mes 

Crunch NEWTAPE File 

Calculate Reasonable Default R 

Better CONTROLPOINT, SYNCPOINT 

Bad Expand Text for Stored Ite 

Data Base Stack 

Correct Handling of B7700 Doll 

Loop After Misspelled Update C 

Possible Buffer Overlay 

BAD SELECT/VERIFY TEXT FOR FIE 

Bad Expandtext 

MOVES LIST EXCEEDED Error 

Erroneous Initial Values for R 

EOF NO LABEL Error 

Identifiers Ending with a Hyph 

Creation of Data Base under "* 

BLOCKS IZE TOO SMALL Fault 

Limit Error on Restart Data Se 

Average Record Size during Upd 

DCRECON Line Result Not Return 

Extended Line TALLYs Problems 

DCSYSTEMTABLES Returns Wrong R 

READNIF Test for Valid Record 

Unlock Line by DCIOFINISH Call 

RECALLOBJOBOUTPUT on Uninitial 

GETSTATUS/SETSTATUS Enhancemen 

DCSYSTEMTABLES Option 5 SEG A 

GETSTATUS/SETSTATUS Enhancemen 

GETSTATUS/SETSTATUS Enhancemen 

DCFILELOCK Deadlock 
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DCALGOL 


32 


.0 


.0073 


39880 


D3357 


DCAUDITOR 


32 


.0 


.0006 


43207 


D3637 


DCPPROGEN 


32 


.0 


.0003 


37761 


D3028 


DCPPROGEN 


32 


.0 


.0004 


37761 


D3028 


DCPPROGEN 


32 


.0 


.0005 


41149 


D3204 


DCPPROGEN 


32 


.0 


.0006 


37865 


P2802 


DCPPROGEN 


32 


.0 


.0007 


37761 


D3028 


DCPPROGEN 


32 


.0 


.0026* 


41738 


P3497 


DCPPROGEN 


32 


.0 


.0029* 


42038 


P3666 


DCPPROGEN 


32 


.0 


.0030* 


42006 


P3677 


DCPPROGEN 


32 


.0 


.0031 


42374 


P3775 


DCSTATUS 


32 


.0 


.0002 


38656 


P3012 


DCSTATUS 


32 


.0 


.0003 


38100 


D3234 


DCSTATUS 


32 


.0 


.0004* 


40451 


P3539 


DCSTATUS 


32 


.0 


.0005* 


41881 


P3572 


DCSTATUS 


32 


.0 


.0006* 


42037 


P3600 


DDDASDL 


32 


.0 


.0005 


39653 


D3327 


DDINITIAL 


32 


.0 


.0001 


39981 


D3337 


DDUPDATE 


32 


.0 


.0013 


38136 


D3149 


DDUPDATE 


32 


.0 


.0015 


39981 


D3337 


DIAGNOSTMCS 


32 


.0 


.0002 


39159 


P3163 


DIAGNOSTMCS 


32 


.0 


.0003 


39937 


P3253 


DIAGNOSTMCS 


32 


.0 


.0004 


40454 


D3427 


DIAGNOSTMCS 


32 


.0 


.0005* 


41882 


P3601 


DIAGNOSTMCS 


32 


.0 


.0006* 


41884 


P3602 


DIAGNOSTMCS 


32 


.0 


.0007* 


41886 


P3603 


DMALGOL 


32 


.0 


.0028 


39225 


P3009 


DMALGOL 


32 


.0 


.0039* 


37723 


P3071 


DMALGOL 


32 


.0 


.0079* 


39248 


P3323 


DMCTL 


32 


.0 


.0005 


38698 


D3100 


DMCTL 


32 


.0 


.0007 


38014 


P2758 


DMCTL 


32 


.0 


.0008 


38137 


P2964 


DMCTL 


32 


.0 


,0009 


38011 


D3170 


DMCTL 


32 


,0 


,0010 


38755 


D3119 


DMCTL 


32 


,0 


,0012* 


37723 


P3071 


DMCTL 


32 


.0. 


,0013 


38755 


D3119 


DMCTL 


32 


,0 


,0015 


38011 


D3170 


DMCTL 


32 


,0, 


,0016 


38011 


D3170 


DMCTL 


32, 


.0 


0018 


39376 


P3108 


DMCTL 


32, 


.0. 


,0019 


39634 


P3182 


DMCTL 


32, 


.0, 


.0021 


39642 


P3175 


DMCTL 


32, 


.0, 


0022 


39639 


D3314 


DMCTL 


32, 


,0, 


0024 


39901 


P3185 


DMCTL 


32, 


,0 


0025 


39981 


D3337 


DMCTL 


32 


.0. 


.0026 


39989 


D3338 


DMCTL 


32. 


.0, 


.0027 


40201 


P3249 


DMCTL 


32, 


.0. 


.0028 


40203 


P3258 


DMCTL 


32, 


,0 


0031 


40231 


D3366 


DMCTL 


32, 


,0, 


.0032 


40232 


P3269 


DMCTL 


32, 


.0, 


0033 


40236 


P3285 


DMCTL 


32, 


.0. 


0036 


40509 


P3316 


DMCTL 


32. 


.0, 


.0037 


40513 


P3317 


DMCTL 


32, 


.0, 


,0038 


40523 


P3343 


DMCTL 


32, 


.0 


0039 


40887 


D3460 


DMCTL 


32, 


.0. 


0040 


38755 


D3119 


DMCTL 


32. 


.0. 


.0041 


40887 


D3460 


DUMPALL 


32. 


.0, 


,0002 


37698 


D3011 


DUMPALL 


32, 


.0. 


,0003* 


41468 


P3468 


DUMPALL 


32, 


.0, 


0004* 


41452 


P3504 


DUMPALL 


32 


.0, 


0005* 


41469 


P3505 


DUMPALL 


32, 


.0. 


,0006* 


41466 


P3537 


DUMPANALY 


32, 


.0. 


0004 


35594 


D3012 


DUMPANALY 


32, 


,0 


0005 


35596 


D3013 


DUMPANALY 


32, 


.0, 


0006 


35594 


D3012 


DUMPANALY 


32, 


.0. 


0007 


35594 


D3012 


DUMPANALY 


32. 


.0. 


.0008 


35594 


D3012 


DUMPANALY 


32, 


.0, 


.0009 


35 594 


D3012 


DUMPANALY 


32, 


.0, 


.0010 


35594 


D3012 


DUMPANALY 


32, 


,0, 


0012 


37196 


D3136 


DUMPANALY 


32, 


.0, 


,0015 


37702 


D3054 


DUMPANALY 


32, 


.0. 


0017 


37183 


D3137 


DUMPANALY 


32. 


0. 


0018 


37170 


D3139 


DUMPANALY 


32. 


0. 


0019 


37168 


D3019 


DUMPANALY 


32, 


0. 


0020 


37167 


D3138 


DUMPANALY 


32, 


0, 


0023 


38047 


P2779 


DUMPANALY 


32. 


0. 


0024 


38048 


P2780 


DUMPANALY 


32. 


0. 


0026 


37821 


P2797 


DUMPANALY 


32. 


0. 


0028 


37167 


D3138 


DUMPANALY 


32. 


0. 


0029 


38469 


D3089 


DUMPANALY 


32. 


0. 


0030 


38197 


D3108 


DUMPANALY 


32. 


0. 


0034 


39068 


P3025 


DUMPANALY 


32. 


0. 


0037 


39109 


P3061 



Remove PORT and SIGNAL 

Add Additional Information to 

Message-Oriented Datacom 

Message-Oriented Datacom 

Changes for DCP Character Orie 

Allow TERMINATE NORMAL 

Message-Oriented Datacom 

Garbled BAUDOT Translate Table 

Consecutive Line Tally Usage 

DLS Corrupted in Full Duplex D 

INCREMENT TRAN Statement 

Print Station Table Base Corre 

Terminal Transfer 

" 17-Character" Names for GRAPH 

Prevent NIF/DCPCODE File Chang 

Calculate Station Table Base S 

Add Version Level 

Data Base Stack 

Reformat Da t ad i c t ionary Report 

Data Base Stack 

Error in BTB Attach by LSN/DLS 

Error in "BTB ALL REPEAT <stri 

Nonnumeric Dial Characters 

Alter Correct Station Address 

Prevent Dump on " <DCL> " 

Attached CA Option 

Correct 'ERROR Construct 

READLOCKNOPURGE Removed 

Eliminate Extraneous " 7 " s for 

Update Level Check for RECOVER 

System Identification 

Data Base Messages 

Shared ACCESSROUTINES, Data Ba 

28 to 29 Conversion Options Re 

READLOCKNOPURGE Removed 

28 to 29 Conversion Options Re 

Shared ACCESSROUTINES, Data Ba 

Shared ACCESSROUTINES, Data Ba 

DMCONTROL Resequenced 

CFDELETEPART Corrupting Contro 

Control File I/O Lock 

Rebuild Across File Discontinu 

Initial Value of Designated Se 

Data Base Stack 

Print Statistics Option 

Mark 32 DMS on Mark 31 MCP 

Normal Vs. Direct Files as Par 

Save and Retrieve Messages 

INVALID INDEX on "OVERRIDE HL" 

CF Title for OVERRIDE HL 

Reduce Use of REORG I NFONODE 

Set Up Prefix Arrays 

Structure De tails 

Preal locat ion of Direct Data S 

28 to 29 Conversion Options Re 

Preal 1 ocat ion of Direct Data S 

Upper Case Input String 

"PACK=<packnamc> " Syntax 

Bad COPY Syntax Now Flagged 

LIST with "<manual input>","<p 

DUMPALL Overrides ON PACKNAME 

Analyze IOCB 

Analyze FIB at Address 

Analyze IOCB 

Analyze IOCB 

Analyze IOCB 

Analyze IOCB 

Analyze IOCB 

Print Interactive Input 

SWAPPER Enhancements 

Dump UNITMAP 

Analyze UNITCONTROL 

REPEAT Syntax in INTERACTIVE M 

Print File Buffers Text 

Bad Printer Skip 

Run DUMPANALYZER in F-BCDIC 

Correct ID Initialization 

Print File Buffers Text 

Memory Dump Tape Record Format 

New Data Base Stack Structure 

DUMPANALYZER Recognizes Frozen 

"MD RV <addr> FOR ALL" Correct 
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DUMPANALY 


32 





0038 


38790 


D3281 


DUMPANALY 


32 





0041 


42792 


P3824 


DUMPANALY 


32 





0042 


39522 


D3292 


DUMPANALY 


32 





0044 


39906 


P3179 


DUMPANALY 


32 





0051 


38100 


D3234 


DUMPANALY 


32 





0054 


40768 


D3417 


DUMPANALY 


32 





0055 


40409 


P3353 


DUMPANALY 


32 





0056 


40818 


D3442 


DUMPANALY 


32 





0060 


40826 


P3361 


DUMPANALY 


32 





0061* 


41172 


P3396 


DUMPANALY 


32 





0062 


41021 


D3481 


DUMPANALY 


32 





0063* 


41199 


P3429 


DUMPANALY 


32 





0066 


41030 


P3430 


DUMPANALY 


32 





0068 


40822 


D3479 


DUMPANALY 


32 





0073 


41057 


D3588 


DUMPANALY 


32 





0074 


41717 


D3589 


DUMPANALY 


32 





0080 


42215 


D3620 


DUMPANALY 


32 





0085 


42183 


D3643 


DUMPANALY 


32 





0090 


38469 


D3089 


DUMPANALY 


32 





0091 


38469 


D3089 


DUMPDIR 


32 





0002 


39217 


D3353 


DUMPDIR 


32 





0003 


39981 


D3337 


DUMPDIR 


32 





0005* 


40903 


P3372 


DUMPDIRLIB 


32 





0007 


38011 


D3170 


DUMPDIRLIB 


32 





0008 


39217 


D3353 


DUMPDIRLIB 


32 





0010 


39981 


D3337 


DUMPDIRLIB 


32 





0012 


40887 


D3460 


DUMPDIRLIB 


32 





0013* 


41368 


P3488 


DUMPDIRLIB 


32 





0014* 


41360 


P3489 


ESPOL 


32 





0002 


39485 


D3285 


ESPOLINTRN 


32 





0005* 


37407 


P2933 


ESPOLINTRN 


32 





0007 


41829 


D3601 


ESPOLINTRN 


32 





0010 


38543 


D3269 


ESPOLINTRN 


32 





0011 


38542 


P3042 


ESPOLINTRN 


32 





0012 


39825 


P3299 


ESPOLINTRN 


32 





0013 


39437 


P3300 


ESPOLINTRN 


32 





0015 


40654 


P3309 


FILECOPY 


32 





0001 


37554 


D3020 


FILECOPY 


32 





0004 


37554 


D3020 


FILECOPY 


32 





0005 


37554 


D3020 


FILECOPY 


32 





0006* 


39543 


P3220 


FILECOPY 


32 





0007* 


40036 


P3201 


FILECOPY 


32 





0008 


40066 


P3431 


FILECOPY 


32 





0009* 


41165 


P3432 


FILECOPY 


32 





0010* 


41163 


P3433 


FILECOPY 


32 





0011* 


41162 


P3434 


FILEDATA 


32 





0002* 


39597 


P3158 


FILEDATA 


32 





0003* 


39596 


P3159 


FILEDATA 


32 





0004* 


39595 


P3160 


FILEDATA 


32 





0005* 


41484 


P3506 


FILEDATA 


32 





0006* 


41188 


P3507 


FILEDATA 


32 





0007* 


41189 


P3508 


FILEDATA 


32 





0008* 


41694 


P3509 


FORTRAN 


32 





0005* 


38139 


P2709 


FORTRAN 


32 





0006* 


38140 


P2710 


FORTRAN 


32 





0007* 


38141 


P2711 


FORTRAN 


32 





0008* 


38142 


P2712 


FORTRAN 


32 





0009* 


38144 


P2734 


FORTRAN 


32 





0010* 


38145 


P2735 


FORTRAN 


32 





0011* 


38146 


P2736 


FORTRAN 


32 





0013* 


38221 


P2836 


FORTRAN 


32 





0014* 


38224 


P2837 


FORTRAN 


32 





0015* 


38223 


P2838 


FORTRAN 


32 





0016* 


38501 


P2867 


FORTRAN 


32 





0017* 


3 8 502 


P2868 


FORTRAN 


32 





0018* 


38222 


P2869 


FORTRAN 


32 





0020 


38188 


D3090 


FORTRAN 


32 





0021* 


38505 


P2904 


FORTRAN 


32 





0022 


38504 


D3093 


FORTRAN 


32 





0023* 


38554 


P2905 


FORTRAN 


32 





0024* 


38552 


P2943 


FORTRAN 


32 





0025* 


38551 


P2944 


FORTRAN 


32 





0026 


38553 


P3656 


FORTRAN 


32 





0027* 


38550 


P2945 


FORTRAN 


32 





0028* 


39133 


P2993 


FORTRAN 


32 





0029* 


39133 


P2993 


FORTRAN 


32 





0030* 


39137 


P3007 


FORTRAN 


32 





0031 


39136 


D3174 


FORTRAN 


32 





0032 


39138 


D3217 


FORTRAN 


32 





0033* 


39139 


P3013 


FORTRAN 


32 





0034* 


39140 


P3014 


FORTRAN 


32 


.0 


0035 


39141 


D3231 



Attribute Handling 

Memory Organization, Local MCP 

OLAYINFO Analysis 

Graph for Data Base Users 

Terminal Transfer 

PROC Command Imp 1 en an ted 

Remove Port, SIGNAL Code 

Analyze Library Template 

SAVE Large Dump 

Heading Date for Disk Input 

New Port Analysis 

Processor Loop after "?END" 

HOSTINFO Deimplemented 

Module Alternative Selection 

New MODE PIB Option 

SAVE Command 

Hostname in Heading 

Analyzing Area Descriptor 

Memory Dump Tape Record Format 

Memory Dump Tape Record Format 

DUMPDIR Enhancements 

Data Base Stack 

Description File Title 

Shared ACCESSROUTINES, Data Ba 

DUMPDIR Enhancements 

Data Base Stack 

Preal locat ion of Direct Data S 

RETAIN Corrected 

Error Using WRITE=/LIST= 

Deimpl ementat ion of ESPOL Comp 

Correctly Handle BASIC Stringp 

Delete Old Intrinsics 

Binary I/O for Strings 

Freefield Input with Complex A 

ALGOL Pointer I/O 

Update B7000 Define 

Array Row Free Format Read 

TASKFAULT, CLASS, OLDWFL Featu 

TASKFAULT, CLASS, OLDWFL Featu 

TASKFAULT, CLASS, OLDWFL Featu 

EXCLUDE USERCODE/= 

"*=" Fi le Requests 

WFL Deck Sequence Number Limit 

NULLFILE Valid Filekind 

INCLUDE Does Not EXCLUDE Autom 

Loop on Invalid Syntax 

Hang on NO FILE 

Valid Requests Rejected After 

Incorrect Indication of IAD Di 

Report on 5N Di sk 

"4-digit" Serial Numbers 

Show Last File in CHECKERBOARD 

FILEORGANIZATION Attribute 

Compiler Loop on DATA Statemen 

Core to Core I/O in WRITE Stat 

Allow Double Precision Express 

Detect GOTO <non existing stat 

Strange Action When CHECK, SEQ 

Format Error on Read from Doub 

Invalid File Attribute in FILE 

INVALID INDEX With SYLPT Table 

AUTOBIND, SEPARATE Set in Main 

AUTOBIND and GO Despite Syntax 

$ Cards Not in NEWTAPE with IN 

Filesize Estimate Incorrect 

Parameters are Call By Name 

Compiler Info Word in Seg Zero 

Blank Card at End of Subroutin 

Warning Message for SLEVEL 

Spurious Errors with SVOIDT, $ 

SSEPARATE Wi thcut Other Statem 

Parameter Mismatch 

Unordered Parameters in Librar 

Arrays Segmented 

INV PCW 

INV PCW 

Too Much Storage Allocated 

De implement SIGNAL, RESPONSE C 

BCL Warnings 

INVALID INDEX Due to Conflict! 

"W2 COMPILER ERROR" When Using 

De implement VECTORMODE OPt ion 

B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 PATCHES 



B6000 SERIES MARK 32 

B6000 SERIES PATCH TABLE (PATCH CLOSING FTRS MARKED WITH '*') 
SOFTWARE PATCH PR I NOTE DESCRIPTION 



PAGE 488 



FORTRAN 


32 


.0 


.0036* 


39137 


P3007 


FORTRAN 


32 


.0 


.0037 


39454 


P3156 


FORTRAN 


32 


.0 


.0039 


39456 


D3362 


FORTRAN 


32 


.0 


.0040* 


39458 


P3663 


FORTRAN 


32 


.0 


.0043* 


40981 


P3435 


FORTRAN 


32 


.0 


.0045* 


40985 


P3469 


FORTRAN 


32 


.0 


.0046* 


41521 


P3540 


FORTRAN 


32 


.0 


.0047* 


41523 


P3541 


FORTRAN 


32 


.0 


.0048* 


41524 


P3542 


FORTRAN 


32 


.0 


.0049* 


41525 


P3543 


FORTRAN 


32 


.0 


.0050* 


41519 


P3544 


FORTRAN 


32 


.0 


.0051* 


41901 


P3545 


FORTRAN 


32 


.0 


.0052* 


41903 


P3546 


FORTRAN 


32 


.0 


.0053* 


41902 


P3573 


FORTRAN 


32 


.0 


.0055* 


41905 


P3592 


FORTRAN 


32 


.0 


.0056* 


41906 


P3615 


FORTRAN 


32 


.0 


.0057 


42550 


P3776 


FORTRAN 


32 


.0 


.0058* 


42341 


D3635 


GENERALSUPP 


32 


.0 


,0006* 


40657 


P3325 


GENERALSUPP 


32 


.0 


.0007* 


40658 


P3326 


GENERALSUPP 


32 


.0 


,0010* 


41888 


P3534 


GENERALSUPP 


32 


.0 


.0012 


39826 


P3298 


GENERALSUPP 


32 


.0 


0016 


38543 


D3269 


GENERALSUPP 


32 


.0 


,0017 


38542 


P3042 


GENERALSUPP 


32 


.0. 


0018 


39825 


P3299 


GENERALSUPP 


32 


.0. 


,0019 


41828 


P3657 


GENERALSUPP 


32 


.0. 


,0020 


40654 


P3309 


HELPINQ 


32 


.0 


0001 


37073 


D3171 


HOSTINTFACE 


32 


.0, 


,0003 


38113 


P2775 


HOSTINTFACE 


32 


,0 


.0004 


38114 


D3085 


HOSTINTFACE 


32 





0005 


38198 


P2881 


HOSTINTFACE 


32 


.0. 


.0006 


38742 


D3230 


HOSTINTFACE 


32. 


.0. 


0007 


39981 


D3337 


HOSTINTFACE 


32. 


,0 


0010 


40885 


P3350 


HOSTINTFACE 


32. 


.0. 


.0011 


41801 


P3707 


HOSTLIB 


32. 


,0. 


0005 


38114 


D3085 


HOSTLIB 


32 


.0. 


.0006 


38202 


P2889 


HOSTLIB 


32 


.0 


0007 


38747 


P2864 


HOSTLIB 


32 


.0, 


0008 


39981 


D3337 


HOSTLIB 


32 


.0. 


0009 


40199 


D3367 


HOSTLIB 


32 


.0. 


0012 


40524 


D3454 


HOSTLIB 


32. 


.0 


0013 


41396 


P3749 


HOSTLIB 


32 


.0, 


0014 


42315 


P3780 


HOSTLIB 


32 


.0. 


0015 


42325 


P3794 


IADMAPPER 


32. 


.0. 


0001 


40709 


D3409 


IN-OUTPUT 


32. 


.0. 


0115 


37993 


D3055 


IN-OUTPUT 


32 


.0. 


0143* 


38077 


P2771 


IN-OUTPUT 


32 


.0. 


0188 


37948 


P2811 


IN-OUTPUT 


32 


.0. 


0381 


39257 


D3222 


IN-OUTPUT 


32 


,0. 


0437* 


39172 


P3067 


IN-OUTPUT 


32. 





0456 


38786 


D3254 


IN-OUTPUT 


32 


0. 


0457* 


37829 


P3074 


IN-OUTPUT 


32. 


.0 


0535 


30505 


D2782 


IN-OUTPUT 


32. 


.0. 


.0558* 


39566 


P3149 


IN-OUTPUT 


32, 


.0 


0579 


39569 


P3169 


IN-OUTPUT 


32 


.0. 


0605 


39593 


P3170 


IN-OUTPUT 


32 


.0. 


0606 


39573 


P317! 


IN-OUTPUT 


32 


.0. 


.0607 


39572 


P3172 


IN-OUTPUT 


32 


.0 


0632 


39576 


P3174 


IN-OUTPUT 


32 


.0. 


0660 


39570 


D3329 


IN-OUTPUT 


32 


.0, 


.0685* 


37494 


P3226 


IN-OUTPUT 


32 


,0 


,0734 


40088 


D3347 


IN-OUTPUT 


32 


.0 


0737 


40091 


D3348 


IN-OUTPUT 


32 


.0. 


,0790 


40291 


D3373 


IN-OUTPUT 


32 


,0. 


,0794 


40091 


D3348 


IN-OUTPUT 


32 


.0 


,0813 


40714 


D3408 


IN-OUTPUT 


32 


.0 


,0839 


40713 


D3407 


IN-OUTPUT 


32 


,0 


,0841 


40714 


D3408 


IN-OUTPUT 


32 


.0 


,0849 


40747 


D3410 


IN-OUTPUT 


32 


,0. 


0862 


40747 


D3410 


IN-OUTPUT 


32 


.0. 


0970 


40873 


D3482 


IN-OUTPUT 


32. 


.0. 


0979 


40873 


D3482 


IN-OUTPUT 


32. 


.0, 


0980 


40873 


D3482 


IN-OUTPUT 


32, 


.0, 


0981 


40873 


D3482 


IN-OUTPUT 


32. 


,0, 


,0982 


40873 


D3482 


IN-OUTPUT 


32. 


.0. 


,0983 


40873 


D3482 


IN-OUTPUT 


32 


.0. 


1010 


41442 


D3499 


IN-OUTPUT 


32. 


.0 


1119 


421 10 


P3633 


IN-OUTPUT 


32 


,0. 


1 120 


40714 


D3408 


IN-OUTPUT 


32 


.0. 


1 121 


42111 


P3634 


IN-OUTPUT 


32 


,0 


, 1241 


42601 


P3783 


INQ 


32 


.0 


,0003 


37073 


D3171 



Too Much Storage Allocated 

Allow Family Name in $ INCLUDE 

Modifications to Support Port 

Using Variable IF in COMMON St 

"SINCLUDE <intname>" Corrected 

Compi 1 jr Loop 

Extra Comma in Parameter List 

Blank Caused Syntax in FILE St 

Use Core to Core I/O 

Invalid Common Allocation 

Exported Untyped Function 

Free Format READ with "REAL *8 

Integer Overflow 

Double Array as Parameter 

INVALID INDEX 

Erroneous Program After Warnin 

DEBUG MONITOR Statement 

INVALID OP With "> Parameters" 

Correct DSQRT Errors 

Correct GAMMA, DGAMMA 

Exponent Underflow in RTOR 

CTOD Terminates Abnormally 

Binary I/O for Strings 

Freefield Input with Complex A 

ALGOL Pointer I/O 

Update B7000 Define 

Array Row Free Format Read 

INQ CREATE/DELETE 

Send Entire Restart Record 

Return Address of Last User Tr 

Eliminate Unused Requestcase V 

Elimination of Response From P 

Data Base Stack 

Eliminate PORT Option 

Use Port Fi 1 es 

Return Address of Last User Tr 

Increase Number of Files in Jo 

Check for Unassigned Transact! 

Data Base Stack 

Simultaneous READ/WRITE Access 

New Statistics 

I/O Complete 

Write Error 

Discontinuity of Block Seriak 

IAD Not Supported on B6900 

CENSUS Attribute 

UNITNO Vs. BACKUPTAPE 

Datacom File, Family Addition, 

Close WITH LOCK 

KIND Fi le Attribute 

Direct Datacom I/O for Swapjob 

Correct State Attribute on Rem 

KIND=DISKVs. FAMILYNAME 

UPDATE, Binary I/O Writing to 

Update, Binary I/O Read Write 

Minimize Header Update 

BCL Backup Fi les 

Use of TD830 ODT for SPO Files 

Break on Output 

MYUSE=IO Vs. UPDATEFILE At t rib 

Protected Files Closed 

FULLTRANSLATION Option 

FILETYPE=5 Files 

DISPOSITION File Attribute 

FILETYPE=5 Files 

AREACLASS Vs. FAMILYINDEX 

AREAS I ZE Vs. NEWF I LE 

AREACLASS Vs. FAMILYINDEX 

MTBF El iminated 

MTBF El iminated 

New Attributes Implemented 



Impl ement ed 
Impl ement ed 
Impl ement ed 
Impl ement ed 
Impl ement ed 



New Attributes 

New At t r i but es 

New At t r i but es 

New At t r i but es 

New At t r i bu t es 

OPEN Input Reverse Tape Files 

Error Messages Contain Line Nu 

AREACLASS Vs . FAMILYINDEX 

Random Badly Blocked I/O 

I/O Result from SEEK Statement 

INQ CREATE/DELETE 
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SOFTWARE PATCH PR I NOTE DESCRIPTION 
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INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INQ 

INTERFACE 

INTERFACE 

INTERFACE 

INTERFACE 

INTERFACE 

INTERFACE 

IXREF 

IXREF 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

JOBFORMAT 

LCOBOL 

LCOBOL 

LCOBOL 

LCOBOL 

LCOBOL 

LOADDUMP 

LOADDUMP 

LOADDUMP 

LOADDUMP 

LOADER 

LOADER 

LOADER 

LOADER 

LOADER 

LOADER 

LOADER 

LOADER 

LOADER 

LOADER 

LOADER 

LOADER 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 

LOGANALY 



32.0.0005 37217 D3264 Implicit Qualification Improve 

32.0.0008 38033 P2759 Optimize FIND VIA <subset> AT 

32.0.0009 38750 P3001 Invalid Page Break on Control 

32.0.0010 38745 P3000 System ID and Patch in Heading 

32.0.0011 39193 P3032 Change to Maximum Display 

32.0.0012 38011 D3170 Shared ACCESSROUTINES, Data Ba 

32.0.0013* 37723 P3071 READLOCKNOPURGE Removed 

32.0.0014 39196 D3273 Setting Items to NULL, Testing 

32.0.0018* 39647 P3161 Truncation of Position 132 

32.0.0019 39644 P3186 Reporting Long Subscripted Alp 

32.0.0021 39654 P3188 Use of "0" in Unquoted String 

32.0.0023 39981 D3337 Data Base Stack 

32.0.0024* 40208 P3334 SET DISPLAY Results in Imprope 

32.0.0026 40230 P3655 Sorting on Subscripted Items 

32.0.0027* 40905 P3387 Functions Performed Via Embedd 

32.0.0031* 41349 P3443 Entering Input Before Previous 

32.0.0032* 41353 P3444 "?AX" Not Recognized on Linear 

32.0.0033* 41301 P3445 Display Item Name 

32.0.0034* 41355 P3446 "#NONE" , "#NO MORE" Termination 

32.0.0035* 41099 P3447 Rounding Virtual Items 

32.0.0036* 41097 P3555 Increase Number of Data Set Fu 

32.0.0037* 41098 P3490 Recall of UPDATE Command 

32.0.0038 41297 D3615 Segmented Value Arrays 

32.0.0039 42415 P3701 Search on Index Random Set 

32.0.0040* 42476 P3745 Virtual Items Evaluated 

32.0.0041 42417 P3747 Improved Searching Capabilitie 

32.0.0042* 42742 P3791 DISPLAY ALL Correction 

32.0.0043* 42782 P3797 Report Control Items 

32.0.0044* 42699 P3792 Do Not Close Data Base if TASK 

32.0.0045 42783 P3823 DISPLAY ALL of Global Data 

32.0.0006 38011 D3170 Shared ACCESSROUTINES, Data Ba 

32.0.0007 38741 D3229 Data Bases at Different Releas 

32.0.0008 38011 D3170 Shared ACCESSROUTINES, Data Ba 

32.0.0009 38011 D3170 Shared ACCESSROUTINES, Data Ba 

32.0.0010* 39387 P3103 Sets not Invoked in Logical DB 

32.0.0011 39981 D3337 Data Base Stack 

32.0.0002 39235 P3147 Add DATABASE as XREF Item 

32.0.0003 40641 P3330 Remove PORT, SIGNAL Variable T 

32.0.0001 37177 D3140 New EOT/EOJ Format 

32.0.0002 37850 D3026 Bad Record Dump 

32.0.0003 38256 D3 1 4 1 Decode Error Sectors 

32.0.0004 38436 P2863 Print Boxes in Ascending Order 

32.0.0005 37911 D3355 Log MLIP I/O Errors 

32.0.0006 41825 D3575 PBIT Time Accounting 

32.0.0008 38328 P3436 Change CONRAC to ODT 

32.0.0009 40835 D3468 Log New Open, Close Informatio 

32.0.0010 41457 D3501 Usage Information for I/O Devi 

32.0.0011* 41477 P3585 NOT READY Messages 

32.0.0012* 42084 P3608 UNITMNEMONICS Array 

32.0.0014* 42085 P3795 DP ALL Message 

32.0.0015 41060 D3594 Replace Logging of ORGHOST by 

32.0.0017 40663 D3356 New and Old ODT Messages 

32.0.0002* 34514 P2713 INVALID INDEX for WORKING-STOR 

32.0.0003 38547 P2873 SNTX for Compile with Syntax E 

32.0.0005 38546 D3235 Workfile Compiled for CANDE Co 

32.0.0006* 38544 P2906 Same Address for Two Level 77 

32.0.0007* 40644 P3547 General LOAD Instructions Agai 

32.0.0001 39981 D3337 Data Base Stack 

32.0.0004 41293 D3614 Eliminate OPEN INITIALIZE 

32.0.0005* 41814 P3712 TITLE Not Parsed Correctly 

32.0.0006 41816 P3713 Prevent SEG ARRAY Error 

0.0001 37991 P2778 IV 

0.0002 37991 P2778 IV 

0005 39120 D3157 LOADER Improvements 

0006 38733 P2962 Convert LOADER to NEWP 

0007 39120 D3157 LOADER Improvements 

0008 39052 P2986 206,207 Disk Pack Coldstart 
0009* 39056 P3053 INVALID ADDRESS Interrupt 
0011 38733 P2962 Convert LOADER to NEWP 
0019 40084 D3014 LH Command 
0029 41178 D3462 HALTLOADEU Messages 
0031* 41207 P3437 INVALID INDEX on MOD 63 
0035 41688 P3694 Sequence 

0004 38256 D3141 Decode Error Sectors 

0005 37911 D3355 Log MLIP I/O Errors 
0006* 40396 P3278 Maintenance Log Entries 

32.0.0007 40397 D3384 Add Starting, Ending Times to 

32.0.0009* 40065 P3362 DL Message INVALID INDEX? 

0.0010* 41943 P3582 Log Not Found 

0.0011 41060 D3594 Replace Logging of ORGHOST by 

32.0.0012* 42148 P3660 Unrecovered Errors Shown 

3 2.0.0013 42801 D3627 THAW Command 



32 

32 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 



32 
32 
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LOGGER 


32 


.0 


.0003* 


39538 


P3166 


LOGGER 


32 


.0 


.0004 


4005 1 


D3416 


LOGGER 


32 


.0 


.0005* 


40062 


P3363 


LOGGER 


32 


.0 


.0006* 


40064 


P3364 


LOGGER 


32 


.0 


.0007 


40835 


D3468 


MCP 


32 


.0 


.0040 


37117 


P2538 


MCP 


32 


.0 


.0070 


37187 


P2765 


MCP 


32 


.0 


.0080 


37702 


D3054 


MCP 


32 


.0 


,0087 


40663 


D3356 


MCP 


32 


.0 


,0095 


37186 


P2766 


MCP 


32 


.0 


.0125 


37990 


D3056 


MCP 


32 


.0 


.0126 


37988 


P2625 


MCP 


32 


.0 


.0151 


38063 


P2770 


MCP 


32 


.0 


.0153 


38069 


D3102 


MCP 


32 


,0 


.0163 


37155 


P2773 


MCP 


32 


.0 


,0173 


38256 


D3141 


MCP 


32 


.0 


,0179 


38197 


D3108 


MCP 


32 





,0182* 


38050 


P2790 


MCP 


32 


.0 


,0184 


37765 


P2792 


MCP 


32 


.0 


,0202 


40663 


D3356 


MCP 


32 


.0 


0221 


40663 


D3356 


MCP 


32 


.0. 


,0225 


38472 


P2856 


MCP 


32 


.0 


,0237 


38481 


P2859 


MCP 


32 


.0. 


0247 


37824 


P2877 


MCP 


32 


.0 


0253 


38561 


P2892 


MCP 


32 


.0 


0254* 


38560 


P2893 


MCP 


32. 


0. 


0264 


40663 


D3356 


MCP 


32. 


0. 


0265 


38469 


D3089 


MCP 


32. 


0. 


0272* 


38571 


P2896 


MCP 


32. 


0, 


.0277 


31307 


D3094 


MCP 


32. 


0. 


0278 


37798 


D3095 


MCP 


32. 


0, 


.0288 


40663 


D3356 


MCP 


32. 


0, 


0290 


38597 


D3104 


MCP 


32. 


0, 


0292 


38600 


P2919 


MCP 


32, 


0, 


0293 


38486 


P2920 


MCP 


32. 


0. 


0294* 


38484 


P2921 


MCP 


32. 


0. 


0298 


38566 


P2924 


MCP 


32 


0. 


0299 


38496 


P2925 


MCP 


32. 


0. 


0301* 


38740 


P2927 


MCP 


32, 


0. 


0303 


38736 


P2929 


MCP 


32. 


0. 


0307 


38735 


P2958 


MCP 


32, 


0. 


031 1* 


38724 


P2959 


MCP 


32. 


0. 


0323 


38564 


D3122 


MCP 


32. 


0. 


0324 


38757 


P2961 


MCP 


32. 


0. 


0329 


36196 


P2914 


MCP 


32. 


0. 


0330 


41830 


D3600 


MCP 


32. 


0. 


0336 


40663 


D3356 


MCP 


32. 


0. 


0337 


38564 


D3122 


MCP 


32. 


0. 


0338 


38492 


P2865 


MCP 


32. 


0. 


0349 


39121 


P2862 


MCP 


32, 


0. 


0352 


38494 


P2963 


MCP 


32 


0. 


0363 


40663 


D3356 


MCP 


32 


,0, 


0367* 


39135 


P2994 


MCP 


32 


0, 


0369 


39058 


P3002 


MCP 


32 


0. 


0373 


42792 


P3824 


MCP 


32 


0. 


0378 


39044 


P2878 


MCP 


32 


0. 


0380 


39068 


P3025 


MCP 


32 


,0. 


0382 


39279 


P3027 


MCP 


32 


0. 


0383 


39085 


P3028 


MCP 


32. 


,0, 


.0384 


39086 


P3029 


MCP 


32. 


.0, 


0392 


39090 


D3228 


MCP 


32. 


0. 


0395 


39088 


P3019 


MCP 


32. 


.0. 


0396 


39085 


P3028 


MCP 


32. 


,0 


0397 


39089 


P3020 


MCP 


32 


.0. 


0399 


39122 


P3024 


MCP 


32 


.0 


,0411 


39060 


P3047 


MCP 


32 


.0 


0423* 


39123 


P3052 


MCP 


32 





0424* 


39087 


P3I96 


MCP 


32 


.0 


0427 


38378 


D3257 


MCP 


32. 


0, 


0429 


39212 


P3063 


MCP 


32. 


0, 


,0430* 


39104 


P3064 


MCP 


32, 





0431* 


39099 


P3065 


MCP 


32, 


0. 


0433 


39214 


P3066 


MCP 


32. 


0. 


0446 


391 10 


P3096 


MCP 


32, 


0. 


0448 


40663 


D3356 


MCP 


32. 


0, 


0458 


39063 


D3252 


MCP 


32. 





0459 


38785 


P3075 


MCP 


32. 


0. 


0460* 


38784 


P3097 


MCP 


32. 


0, 


0463 


391 10 


P3096 


MCP 


32. 


0, 


0468 


3 8 564 


D3122 


MCP 


32. 


0, 


,0474 


38790 


D3281 


MCP 


32. 


0. 


0481 


39065 


P3100 



ORGMCS, DESTMCS Integer Type 

LOGGER vs DL LOG 

Year to Date Sort Errors 

No File Job summary 

Log New Open, Close Informatio 

Spurious PACK IN USE Message 

Seek Lost Message 

SWAPPER Enhancements 

New and Old ODT Messages 

Print Entire Buffer in PROGRAM 

Idle Patterns in Printer Dump 

Printer Dump Loop 

Non-MCS DCWRITE 

BNA MCS 

Hung Library Maintenance after 

Decode Error Sectors 

New Data Base Stack Structure 

RESTORE Vs . DS 

Halting DCP in SECONDARYINIT 

New and Old ODT Messages 

New and Old ODT Messages 

DISCSTATUS Vs. BLASTUNIT 

UNITSTATISTIC 

Dump Mechanism 

FORGETCHECK 

Single Bit Error Logging 

New and Old ODT Messages 

Memory Dump Tape Record Format 

COPY Vs . FAMILY INDEX 

Autoprint Can Run in Local Mem 

Intrinsics in Local Memory 

New and Old ODT Messages 

XALGOL De impl ement ed 

Send Message to Local DBS 

Memory Management 

Saving Memory Mods 

PROCID Vs. "M[MSGADDR+3] H 

Memory Management 

"7-Track" Library Tapes 

RECONFIGURATION 

RESOURCECHECK 

Overlay File Corruption 

Implied Concatenations Made Ex 

Incorrect Family Substitution 

Record Sequence 

Delete Old Intrinsics 

New and Old ODT Messages 

Implied Concatenations Made Ex 

SYSTEMSTATUS (11): SWAPPER Pa r 

JOBDESC Complement 

SUPERPLUCK Hangs/Dumps Vs. SCH 

New and Old ODT Messages 

Parameter Mismatch 

Rem ve B6700 FINDMEMORYPARITY 

Mem ry Organization, Local MCP 

Bad Momaddress 

DUMPANALYZER Recognizes Frozen 

STARTSYSTEM 

Check for Library Capable 

Correct FORGET CHECK on Librar 

Printer Dump Hardware Interrup 

NOT READY RSVP 

Check for Library Capable 

Attribute Handling for Data Ba 

MOVE Vs. Disk Pack Type 206 

Tightly-Coupled Main Memory DC 

PATHRES DS 

ZOT Library Template Marker in 

IVR Facility on Mark 33 Releas 

Data Base Equation Implement at 

SWAPPER Hung Vs. Controlcard 

Job Fi le Rol 1 Out 

DMSOPEN Contiguous Save Memory 

NO GO PAST Protection 

New and Old ODT Messages 

Semidependent Tasks, VISIBILIT 

Printer Dump to Drum Printer 

Separate Halt/Load Packs 

NO GO PAST Protection 

Implied Concatenations Made Ex 

Attribute Handling 

RESIZE Reorganization 
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MCP 


32 


.0 


.0492 


39678 


P3098 


MCP 


32 


.0 


.0493 


39066 


P3127 


MCP 


32 


.0 


.0494 


39389 


P3112 


MCP 


32 


.0 


.0500 


39680 


P3 1 1 5 


MCP 


32 


.0 


.0516 


39700 


P3116 


MCP 


32 


,0 


.0517 


39701 


P3117 


MCP 


32 


,0 


.0518 


39618 


P3136 


MCP 


32 


.0 


.0519 


39691 


D3282 


MCP 


32 


.0 


.0529 


39535 


P3128 


MCP 


32 


.0 


.0537 


39549 


P3129 


MCP 


32 


.0 


.0538 


39548 


P3130 


MCP 


32 


.0 


,0539 


39547 


P3131 


MCP 


32 


.0 


.0540 


39550 


P3132 


MCP 


32 


.0 


.0552 


39693 


P3133 


MCP 


32 


,0 


,0553 


39520 


P3134 


MCP 


32 


.0 


.0554 


39521 


P3135 


MCP 


32 


.0 


,0555 


39522 


D3292 


MCP 


32 


,0, 


,0556 


39523 


P3138 


MCP 


32 


,0 


,0557 


39549 


P3129 


MCP 


32 


.0 


,0561 


39582 


P3148 


MCP 


32 


,0 


.0563 


39524 


P3150 


MCP 


32 


,0, 


,0577 


39705 


D3309 


MCP 


32 


,0, 


,0582 


39587 


P3203 


MCP 


32 


,0, 


,0603 


39707 


D3311 


MCP 


32 


,0, 


,0609 


39671 


P3173 


MCP 


32 


0. 


0610 


40663 


D3356 


MCP 


32 


0. 


,0628* 


39609 


P3197 


MCP 


32, 


,0. 


,0629 


40663 


D3356 


MCP 


32 


,0. 


0634 


39906 


P3179 


MCP 


32 


0, 


,0640* 


39615 


P3219 


MCP 


32. 


,0. 


,0651* 


39696 


P3233 


MCP 


32. 


.0, 


0652 


40016 


P3206 


MCP 


32. 


,0, 


0654 


39525 


P3222 


MCP 


32. 





0664 


40067 


P3223 


MCP 


32. 


.0, 


0684 


40080 


P3224 


MCP 


32 


,0, 


,0686 


39126 


P3227 


MCP 


32 


,0. 


0689* 


40081 


P3228 


MCP 


32 


,0, 


,0693 


39527 


P3240 


MCP 


32 


,0. 


,0696* 


40332 


P3238 


MCP 


32 


,0 


,0702* 


40094 


P3239 


MCP 


32 


,0 


0707 


40264 


D3352 


MCP 


32 





,0710 


38305 


P3255 


MCP 


32 


,0, 


.0711 


40104 


D3399 


MCP 


32 


.0, 


,0718 


40287 


D3341 


MCP 


32 


,0 


,0724 


38311 


P3264 


MCP 


32 


,0 


.0725 


40424 


P3280 


MCP 


32 





,0729 


40038 


D3346 


MCP 


32 


,0 


,0732* 


40105 


P3257 


MCP 


32. 





,0743 


40373 


P3279 


MCP 


32. 


,0. 


0744 


40374 


D3400 


MCP 


32. 


,0. 


,0746 


40103 


D3381 


MCP 


32. 


0, 


0747 


40360 


P3281 


MCP 


32. 


0, 


0754 


40229 


P3282 


MCP 


32. 


0. 


0756 


40378 


P3283 


MCP 


32. 


0. 


0764 


40379 


D3386 


MCP 


32. 


0. 


0774 


40040 


P3277 


MCP 


32. 


0. 


0775 


40103 


D338! 


MCP 


32. 


0. 


0784 


40389 


D3379 


MCP 


32. 


0. 


0787 


40663 


D3356 


MCP 


32, 


0. 


0792 


38100 


D3234 


MCP 


32. 


0, 


0798 


40488 


P3335 


MCP 


32, 


0, 


0805 


40395 


P3301 


MCP 


32, 


0. 


0835 


40744 


P3321 


MCP 


32, 


0. 


,0836* 


40750 


P3319 


MCP 


32, 


,0, 


0843 


40709 


D3409 


MCP 


32, 


,0. 


0850 


40756 


D3411 


MCP 


32 


,0. 


0887 


40776 


D3573 


MCP 


32, 


,0, 


0888* 


40778 


P3339 


MCP 


32, 


.0. 


,0894* 


40785 


P3336 


MCP 


32. 


.0, 


0899 


40773 


P3338 


MCP 


32 


,0, 


0900 


40986 


D3425 


MCP 


32. 


,0, 


0905 


40103 


D3381 


MCP 


32, 


,0. 


0910* 


40805 


P3355 


MCP 


32 


,0, 


,0911 


40794 


P3356 


MCP 


32 


,0, 


,0933* 


40820 


P3358 


MCP 


32 


,0, 


,0940* 


40786 


P3496 


MCP 


32 


,0 


,0941* 


40783 


P3375 


MCP 


32 


.0 


,0942 


40787 


P3376 


MCP 


32 


.0 


.0947 


40834 


D3480 


MCP 


32 


.0 


,0950 


40835 


D3468 


MCP 


32 


.0 


.0957 


41159 


P3448 


MCP 


32 


.0 


.0958* 


41173 


P3449 



DMSUPDATEDISKHEADER NOOP 

TC Overlay File Corruption 

DMSII Exception Categories 

FILECARDS Attribute FORGETCHEC 

FORGETCHECK after Memory Excee 

SWAPPER, Stack Stretch 

Forgotten PIB 

Virtual Memory Size Statistics 

COPY&COMPARE Vs . Reel Switch 

STATISTICS 

Scheduling on B6800 Multiproce 

DL SUMLOG 

Separate Halt/Load Families 

Library Maintenance IOCB 

INTRINSICINFO 

"CHECKPOINTed" Swaptask 

OLAYINFO Analysis 

Ready Queue Time 

STATISTICS 

Memory Dumps on a Shared Resou 

ACTIVETIME 

ITINERARY Task Attribute 

External By Calling Library Pr 

ORGHOSTNAME Attribute Deimplem 

Printing of Inuse Code Segment 

New and Old ODT Messages 

IPC Swapjobs Vs. Subspace Grow 

New and Old ODT Messages 

Graph for Data Base Users 

Working Sets 

UNIT 

Make EBCDICTOWORD Inline 

Correct PBIT of Zero Length Do 

Defunct in DUMPBOOTSTRAPPER 

Attribute Grabber Fault 

PAST Order 

Resumed ST Tasks have Excess O 

Usercode on 14-level File Name 

Card Reader Error Recovery 

Copying Too Many Files 

Modifications to Support Port 

Logging Internal File Name 

CM Vs. Duplicated MCPs 

Support of Old Codefiles 

Logging Row Index 

Avoid Bad Search from STACKSTR 

RJE Vs. DLBACKUP 

Increase Maximum BDNUMBER 

BACKUPQUEUER 

Analyze Library Parameter Mism 

Improvements to Working Set Sh 

Programmed Operator Interrupt 

Pass Control File Pack Name to 

AUTOPRINT with FMed Printer 

New Userdata Error Code "(42)" 

Tasks Suspended by WSSHERIFF 

Improvements to Working Set Sh 

Set Library Function 

New and Old ODT Messages 

Terminal Transfer 

Handle Null Subsystem in Unrav 

Excess Working Set Sheriff Ove 

Bounce Dump 

INV OP in Attribute Handler 

IAD Not Supported on B6900 

Priority, Dl Information 

PBIT Time Accounting 

TAPESEARCH 

Fault Because of Missing Intri 

Analyze Library Template 

Delete PORTS, SIGNALS 

Improvements to Working Set Sh 

Program Marked as Swapjob 

QT PB MT 

LOADALABEL vs MULTIFILE 

LOCKTRACE Option 

GETSTATUS FORGETCHECK 

LOADCONTROL to Tape 

Int r ins i c Mapping 

Log New Open, Close Informatio 

Checkpoint/Restart for Program 

Restart of Serial Disk Files N 
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B6000 SERIES MARK 32 

B6000 SERIES PATCH TABLE (PATCH CLOSING FI"RS MARKED WITH '*') 

SOFTWARE PATCH PR I NOTE DESCRIPTION 

MCP 32.0.0959 41174 P3450 Rerun of COBOL Files with Use 

MCP 32.0.0962 41021 D3481 New Port Analysis 

MCP 32.0.0963 40749 P3451 Multiple Wait 

MCP 32.0.0967 41190 P3452 STACKLIMIT Task Attribute 

MCP 32.0.0971 40298 D3485 OPEN Function Values 

MCP 32.0.0972* 41191 P3453 Correct Time Slice Calculation 

MCP 32.0.0973 41197 D3483 DONT CARE Libraries 

MCP 32.0.0974* 41198 P3454 Allow Halt/Load After Power Up 

MCP 32.0.0976 41196 D3484 USECATuEFAULT Vs. DIAGNOSTICS 

MCP 32.0.0986 41200 P3455 BOUNCE Message 

MCP 32.0.0988* 41206 P3456 SYSTEMSTATUS Vs. UNITMOVER 

MCP 32.0.0991* 41209 P3522 Stackswap Vs. St acks t re t cher 

MCP 32.0.0993 41202 P3461 Checkpoint of Large Size Stack 

MCP 32.0.0997* 41213 P3457 Calculation of Code Core Estim 

MCP 32.0.0998* 41437 P3458 FA Swapjob 

MCP 32.0.1000 37702 D3054 SWAPPER Enhancements 

MCP 32.0.1007 41212 P3620 Library Maintenace Tape Errors 

MCP 32.0.1009* 40808 P3521 REELSWITCH Vs. Density 

MCP 32.0.1013 41447 P3482 Dynamic EBIT 

MCP 32.0.1017 41496 P3478 Improve Run Time Parameter Che 

MCP 32.0.1020 41474 D3502 Shrink Frozen Library's Stack 

MCP 32.0.1021* 41476 P3479 Multiple Flagreaders 

MCP 32.0.1022 41485 D3516 Library Function Names 

MCP ' 32.0.1023* 41486 P3480 Halt/Load Memory Configuration 

MCP 32.0.1024 41460 D3500 Changes to SYSTEMSTATUS Calls 

MCP 32.0.1025 41457 D3501 Usage Information for I/O Devi 

MCP 32.0.1026 41040 P3568 Programs Using Mark 31 Ports a 

MCP 32.0.1028* 41477 P3585 NOT READY Messages 

MCP 32.0.1029 41384 P3527 Data Base TITLE Attribute Veri 

MCP 32.0.1031* 41692 P3523 Destname on ACR Codefiles 

MCP 32.0.1032* 41689 D3529 PARTNER , EXCEPTIONTASK Remov 

MCP 32.0.1035* 36098 P3524 Reservedisk and Userdata Heade 

MCP 32.0.1036 41693 D3536 SYSTEMSTATUS, IOTRACE for MLIP 

MCP 32.0.1038* 41702 P3607 Tape Verify 

MCP 32.0.1040* 41699 P3519 Report on Exclusive Files 

MCP 32.0.1044 41449 P3569 Close Port Values 

MCP 32.0.1045* 41698 D3548 DBS in Local Memory Vs. Noncxc 

MCP 32.0.1047* 41478 P3621 Paths, FREE, DISKSTATUS Proble 

MCP 32.0.1048 41710 D3550 Eliminate DL Network 

MCP 32.0.1050* 41696 P3528 Units Equal Character Vs. Back 

MCP 32.0.1051 40877 P3570 AVAILABLE Type of File Open 

MCP 32.0.1057* 41489 P3529 Password Handling 

MCP 32.0.1058 41714 D3551 Password Manipulation 

MCP 32.0.1059* 41715 P3530 "CONTROLCARD( QUEUE, 7) " 

MCP 32.0.1063* 41719 P3531 Stack Overflow Handling 

MCP 32.0.1077* 41736 P3575 Forgetcheck After Programdump 

MCP 32.0.1078 41049 D3564 WFL Task Fault Across Network 

MCP 32.0.1079* 41938 P3576 INVALID OP in DMSCAUSE 

MCP 32.0.1080* 41940 P3577 SWAPPER Vs. SIB 

MCP 32.0.1081* 41720 P3578 Software Interrupt Handling 

MCP 32.0.1083* 41944 P3579 JOBDESC Vs. Nonexchanged Units 

MCP 32.0.1089 41952 D3579 Processkill Event Errors 

MCP 32.0.1094* 41955 P3609 Checkpoint Restart with Array 

MCP 32.0.1095 41951 P3631 New Fine Priority Algorithm 

MCP 32.0.1100* 41687 P3610 Volume Library 

MCP 32.0.1110 42106 P3632 Messages 

MCP 32.0.1112* 42109 P3647 Resource Wait 

MCP 32.0.1113 41060 D3594 Replace Logging of ORGHOST by 

MCP 32.0.1115 42068 D3595 Intrinsic to Support Library M 

MCP 32.0.1128* 41956 P3648 DESTNAME Attribute 

MCP 32.0.1136* 42139 P3649 ODT Queue 

MCP 32.0.1137* 42139 P3649 ODT Queue 

MCP 32.0.1138* 42192 P3650 DS Permanent Library 

MCP 32.0.1140* 42197 P3651 Expand Max Task Parameters 

MCP 32.0.1142* 42149 P3652 WFL Subroutines 

MCP 32.0.1143* 41479 P3746 Scratch Tape Without Write Rin 

MCP 32.0.1145 40287 D3341 Support of Old Codefiles 

MCP 32.0.1147* 42162 P3653 FS and DS ODT Inputs 

MCP 32.0.1148 40663 D3356 New and Old ODT Messages 

MCP 32.0.1149 40663 D3356 New and Old ODT Messages 

MCP 32.0.1154* 42086 P3654 Read Header Reorganization 

MCP 32.0.1160 42252 D3618 COBOL74 Vs. WORD Mode Files 

MCP 32.0.1171* 42089 P3685 "UR-" 

MCP 32.0.1173 42090 P3748 DUP FILE Message 

MCP 32.0.1176 42169 D3619 SYSTEMSTATUS Type 4 General Un 

MCP 32.0.1185 42215 D3620 Hostname in Heading 

MCP 32.0.1186* 40757 P3686 INVALID OP in Presence Bit 

MCP 32.0.1189* 42180 P3687 BDNAME SEG ARRAY Fault 

MCP 32.0.1195* 42184 P3688 Autoprint AX Command 

MCP 32.0.1199 42119 D3606 OFFSET and DELTA 

MCP 32.0.1212* 42178 P3710 DMSCLOSE Vs. CONTROLLER 

MCP 32.0.1215 42122 P3781 TAPEDUMP, Report Block, Rewr i t 

B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 PATCHES 
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B6000 SERIES PATCH TABLE (PATCH CLOSING FTRS MARKED WITH '*') 
SOFTWARE PATCH PRI NOTE DESCRIPTION 



PAGE 493 



MCP 


32 


.0, 


, 1231 


42468 


P3782 


MCP 


32 


.0, 


, 1238 


42503 


P3801 


MCP 


32 


,0, 


, 1246 


42381 


P3787 


MCP 


32 


.0. 


, 1248 


42566 


D3642 


MCP 


32 


,0, 


, 1254 


42532 


P3784 


MCP 


32 


.0, 


1266 


42501 


D3641 


MCP 


32. 


,0. 


1275 


42328 


P3817 


MCP 


32 


,0, 


1287 


43207 


D3637 


MCP 


32 


,0, 


1295 


42122 


P3781 


MCP 


32. 


,0. 


1297 


42501 


D3641 


MCP 


32 


,0. 


1301 


40080 


P3224 


MCP 


32. 


,0. 


1305 


42850 


D3652 


MCP 


32. 


,0. 


1309 


42790 


P3802 


MCP 


32. 


,0. 


1310 


42792 


P3824 


MCP 


32, 


,0. 


1311 


42793 


P3822 


MCP 


32. 


,0. 


1334 


39787 


D3354 


MCP 


32 


,0. 


1355 


42864 


P3825 


MCP-GENERAL 


32 


,0. 


1229 


42501 


D3641 


MLIP 


32 


,0. 


0033 


37495 


D3142 


MLIP 


32, 


,0. 


0034 


37275 


P2763 


MLIP 


32. 


,0. 


0048 


37198 


P2764 


MLIP 


32. 


0. 


0049 


37495 


D3142 


MLIP 


32. 


.0. 


0058 


37495 


D3142 


MLIP 


32. 


.0. 


0069 


37461 


P3680 


MLIP 


32. 


.0. 


0083 


37461 


P3680 


MLIP 


32. 


.0. 


0154 


38055 


D3123 


MLIP 


32 


,0. 


0156 


38055 


D3123 


MLIP 


32, 


,0. 


0157 


38055 


D3123 


MLIP 


32, 


,0. 


0158 


38055 


D3123 


MLIP 


32. 


0. 


0174 


38055 


D3123 


MLIP 


32. 


,0. 


0175 


38055 


D3123 


MLIP 


32. 


0. 


0196 


38055 


D3123 


MLIP 


32. 


0. 


0208 


38055 


D3123 


MLIP 


32. 


.0. 


0209 


38055 


D3123 


MLIP 


32. 


0. 


0267 


38055 


D3123 


MLIP 


32. 


.0. 


0270 


37911 


D3355 


MLIP 


32. 


,0. 


0312 


38055 


D3123 


MLIP 


32. 


.0. 


0313 


38055 


D3123 


MLIP 


32, 


,0. 


0348 


37495 


D3142 


MLIP 


32. 


,0. 


0376 


38055 


D3123 


MLIP 


32. 


.0. 


0454 


38795 


D3251 


MLIP 


32. 


0. 


0466 


38055 


D3123 


MLIP 


32. 


0. 


0659 


38795 


D3251 


MLIP 


32. 


0. 


0723 


38795 


D3251 


MLIP 


32, 


0. 


0943 


40663 


D3356 


MLIP 


32. 


0. 


1064 


40663 


D3356 


NDL 


32. 


0. 


0003* 


37862 


P2714 


NDL 


32 


0, 


0004 


37761 


D3028 


NDL 


32 


0. 


0005 


37761 


D3028 


NDL 


32, 


0, 


0006 


41149 


D3204 


NDL 


32, 


0, 


0007 


37863 


P2804 


NDL 


32 


.0. 


0015* 


39940 


P3256 


NDL 


32 


,0 


0016 


40434 


D3385 


NDL 


32 


,0, 


0021 


41068 


P3599 


NDL 


32 


,0 


0022* 


41067 


P3604 


NDL 


32 


,0, 


0023* 


39471 


P3605 


NDL 


32 


.0 


0024* 


42678 


P375! 


NEWP 


32 


.0, 


.0014 


37757 


D2973 


NEWP 


32 


,0 


.0015 


37758 


D2974 


NEWP 


32 


.0 


.0016 


34311 


D3031 


NEWP 


32 


.0 


,0019 


37286 


D3032 


NEWP 


32 


,0, 


.0020 


37283 


D3033 


NEWP 


32 


.0 


,0023 


38234 


P2743 


NEWP 


32 


.0 


,0025 


37753 


D3068 


NEWP 


32 


.0, 


.0026 


37750 


P2805 


NEWP 


32 


.0, 


.0028 


38231 


P2806 


NEWP 


32 


.0 


.0029 


38230 


P2807 


NEWP 


32 


.0 


.0031 


38232 


D3064 


NEWP 


32 


.0 


.0037 


38536 


D3 106 


NEWP 


32 


.0 


.0038 


38548 


P2934 


NEWP 


32 


.0 


.0039 


38445 


D3103 


NEWP 


32 


.0 


.0040 


38773 


D3110 


NEWP 


32 


.0 


.0041 


38549 


P2946 


NEWP 


32 


.0 


.0042 


38772 


D3058 


NEWP 


32 


.0 


.0043 


38446 


P2947 


NEWP 


32 


.0 


.0044 


38228 


D3151 


NEWP 


32 


.0 


.0045 


38533 


D31S2 


NEWP 


32 


.0 


.0046 


38227 


P2733 


NEWP 


32 


.0 


.0049 


39145 


D3158 


NEWP 


32 


.0 


.0052 


39146 


P3057 


NEWP 


32 


.0 


.0053 


39147 


D3283 


NEWP 


32 


.0 


.0055 


39426 


D3260 



Resize Overlayable Arrays in G 
Corruption of LIBUSEMAP 
GUARDFILE Vs. CANDE 
CANDE Vs. Foreign Tasks 
Avoid Hung Printers 
Compile Time Options 
Erroneous DS when DBS Initiati 
Add Additional Information to 
TAPEDUMP, Report Block, Rewr i t 
Compile Time Options 
Attribute Grabber Fault 
Libraries Vs. "??DS", CM , REC 
FIB Creation Locking 
Memory Organization, Local MCP 
EXCEPTIONTASK Visibility 
Intrinsic to Library Conversio 
Parity on Presencebit Stackove 
Compile Time Options 
Initialization Routines for B6 
Implement PRINTERDUMP 
PRINTIOCB Interface Analyzes I 
Initialization Routines for B6 
Initialization Routines for B6 
Peripheral Test Driver 
Peripheral Test Driver 
B6900 Peripheral Test Driver 
B6900 Peripheral Test Driver 
B6900 Peripheral Test Driver 
B6900 Peripheral Test Driver 
B6900 Peripheral Test Driver 
B6900 Peripheral Test Driver 
B6900 Peripheral Test Driver 
B6900 Peripheral Test Driver 
B6900 Peripheral Test Driver 
B6900 Peripheral Test Driver 
Log MLIP I/O Errors 
B6900 Peripheral Test Driver 
B6900 Peripheral Test Driver 
Initialization Routines for B6 
B6900 Peripheral Test Driver 
GETSTATUS/SETSTATUS Enhancemen 
B6900 Peripheral Test Driver 
GETSTATUS/SETSTATUS Enhancemen 
GETSTATUS/SETSTATUS Enhancemen 
New and Old ODT Messages 
New and Old ODT Messages 
Page Between VOIDT and POP VOI 
Message-Oriented Da t acorn 
Message-Oriented Datacom 
Changes for DCP Character Or i e 
ENTER 

Inhibit Sync Edit Wrong 
Different Terminal Addresses 
Enlarge UNFO Array 
"SNETWORK" Option 
Clear Linetable Array 
Call BRANCHLINK 
"AT <library id>" Allowed 
INITIALIZATION is Reserved Wor 
Conditional Operators 
Implement Control State Blocks 
Prevent GOTO Into FOR Statemen 
Better Listing for Modular SEP 
ALTERNATIVES and INITIALIZATIO 
Error for Missing Procedure 
Attribute for Task Array Elcme 
Error for Empty Parenthesis 
Arrays with Unspecified Bounds 
Clarification of MAKEPCW Restr 
IXREF Environments for Cheap B 
Events and Event Arrays as Par 
"<procedure name>. VALUE" 
Reduced Time for NEWP XREF 
Inline Procedures 
Prevent INVALID INDEX 
Increased Host Blocksize 
Allow the MCP to Freeze as a L 
Improve FILE/LIBRARY Declarati 
Match NEWP Codefile level to B 
Address Equation to Undeclared 
"XREFing" Alternatives 
FIRSTFREEDOCELL Now Defaults t 
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B6000 SERIES PATCH TABLE (PATCH CLOSING FTRS MARKED WITH '••) 
SOFTWARE PATCH PRI NOTE DESCRIPTION 
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NEWP 


32 


.0 


.0056 


39434 


P3082 


NEWP 


32 


.0 


.0058 


38226 


P3087 


NEWP 


32 


.0 


.0059 


38225 


D3261 


NEWP 


32 


.0 


.0060 


39482 


D3262 


NEWP 


32 


.0 


.0064 


♦ 39514 


D3299 


NEWP 


32 


.0 


.0065 


39464 


D3300 


NEWP 


32 





.0066 


39750 


P3140 


NEWP 


32 





0080 


39783 


D3401 


NEWP 


32 





0081 


» 40639 


P3297 


NEWP 


32 





0089 


40133 


P3344 


NEWP 


32 





0090 


40128 


D3420 


NEWP 


32 





0091 


40130 


D3421 


NEWP 


32 





0092 


40131 


D3422 


NEWP 


32 





0098 


40139 


D3486 


NEWP 


32 





0101 


40135 


P3438 


NEWP 


32 





0102 


41229 


D3487 


NEWP 


32 





0103 


41405 


P3470 


NEWP 


32 





0108 


41424 


D3535 


NEWP 


32 





0109 


40549 


D3530 


NEWP 


32 





0110 


41502 


D3549 


NEWP 


32 





0115 


41508 


D3590 


NEWP 


32 





0116 


41718 


D3591 


NEWP 


32 





0119 


42099 


P3627 


NEWP 


32 





0120 


42100 


P3628 


NEWP 


32 





0121 


40131 


D3422 


NEWP 


32 





0122 


41853 


D3592 


NEWP 


32 





0123 


41857 


D3593 


NEWP 


32 





0124 


41862 


P3629 


NEWP 


32 





0127 


42052 


D3626 


NEWP 


32 





0128 


41865 


D3598 


PATCH 


32 





0002 


34320 


D3007 


PATCH 


32 





0003 


► 34319 


P2715 


PATCH 


32 





0004* 34317 


P2716 


PATCH 


32 





0005* 34316 


P2717 


PATCH 


32 





0006 


38089 


D3034 


PATCH 


32 





0007 


38088 


D3035 


PATCH 


32 





0011 


42105 


P3630 


PATCH 


32 





0012 


42107 


D3599 


PL I 


32 





0002" 


> 33467 


P2718 


PL I 


32 





0003" 


» 33465 


P2719 


PL I 


32 





0004' 


» 37896 


P2720 


PL I 


32 





0005' 


' 37877 


P2721 


PL I 


32 





0006' 


' 37878 


P2722 


PL I 


32 





0007' 


' 37881 


P2808 


PL I 


32 





0008' 


> 37880 


P2809 


PL I 


32 





0009' 


• 37895 


P2810 


PL I 


32 





0010 


38188 


D3090 


PL I 


32 





0016' 


' 37892 


P2840 


PLI 


32 





0017' 


» 37891 


P2841 


PL I 


32 





0020' 


» 38461 


P2850 


PLI 


32 





0021- 


' 38448 


P2870 


PLI 


32 





0022- 


• 38459 


P2907 


PLI 


32 





0023' 


' 38455 


P29U 


PLI 


32 





0024' 


' 38456 


P2912 


PLI 


32 





0025 


38458 


P2935 


PLI 


32 





0026' 


' 38450 


P2769 


PLI 


32 





0027 


38457 


P2767 


PLI 


32 





0029' 


" 39173 


P2982 


PLI 


32 





0030' 


* 39183 


P3006 


PLI 


32 





0031' 


» 39180 


P3016 


PLI 


32 





0032' 


' 39178 


P3017 


PLI 


32 





0033' 


' 39184 


P3018 


PLI 


32 





0034' 


> 39163 


P3043 


PLI 


32 





0035 


39177 


P3044 


PLI 


32 





0037' 


' 39175 


P3058 


PLI 


32 





0038' 


» 39174 


P3062 


PLI 


32 





0039 


39171 


P3088 


PLI 


32 





0041" 


» 39167 


P3143 


PLI 


32 





0044' 


" 39951 


P3211 


PLI 


32 





0045 


39952 


P3212 


PLI 


32 





0047 


40264 


D3352 


PLI 


32 





0048 


40258 


P3310 


PLI 


32 





0049 


40251 


P3367 


PLI 


32 





0050 


40252 


P3337 


PLI 


32 





0051' 


' 41656 


P3471 


PLI 


32 





0052' 


' 41657 


P3472 


PLI 


32 





0053' 


' 41655 


P3473 


PLI 


32 





0054' 


' 41652 


P3474 


PLI 


32 





0055' 


' 41650 


P3475 


PLI 


32 





0056' 


' 41653 


P3476 


PLI 


32 





0057' 


' 41649 


P3477 


PLI 


32 





0058' 


' 41647 


P3510 



Error For Duplicate Case Eleme 

SEPCOMP Loses Source Lines 

New Fault Name, LIBLINKFAULT 

New $ Option, STANDALONE 

Close LINE and ERRORFILE 

Segment Identifiers 

Prevent Compiler SEG ARRAY Fau 

PORTS Option Discontinued 

Comparing Pointer 

Stack Overflow 

PARITYFAIL1 Fault 

HEYOU Disallowed on B7000 Syst 

ZAP Intrinsic for B7000 

Direct I/O 

BINDINFO for Alternatives 

MCP Code File Row Size = 504 

SEPCOMP Creates Erroneous Stac 

PACKDECIMAL Intrinsic 

FUNCTIONNAME, LIBACCESS Attri 

"8-Digit" Patch Marks 

DESCRIPTOR Procedures to Libra 

Procedure Entry via References 

Null Environments in XREF 

Extraneous XREF Environments 

ZAP Intrinsic for B7000 

PROTECTED Option in Library Ex 

REGISTERS and DLL 

" <ar i thme t i c expression> IN <t 

Resizing EVENT ARRAYS 

SYSTEMLIB Library Attribute 

Patch Numbers with S.VERSION/C 

Character Mode Files 

Out of Sequence Patches 

$. GUARD Option 

New List and Compare Options 

VERSION May Be RESET 

Line Width 

MARKBLANK and DELIMOPT Options 

Exponentiation Mixing Operands 

Correct ATAND 

Double Precision PICTURE *H' 

SUBSTR of Binary Data 

Branching from Start of Segmen 

Precedence of Operators 

Duplicate Label and Entry Name 

PIC , (12)HS > 

Compiler Info Word in Seg Zero 

OR Operation on BDMS Field Bit 

":=" as Assignment Operator 

Undefined Format 

Logical Operations on BIT Stri 

Stack Cel 1 for ELSE 

SORT Compares on Pictured Keys 

LABELTYPE= ' OM I TTED ' 

More than 48 "%DO" Statements 

Statement Numbers in Error Mes 

System File Attribute Paramete 

Independent Task Initiation 

Pointer Initialization 

Ignored LENGTH or INITIAL Spec 

String Builtin Functions 

DIMENSION Not First Attribute 

EXCEPT Builtin Function 

1 1 1 egal Pr imary 

PIC 'X' Array Elements 

Compiletime DO and INCLUDE 

BIT Compares 

PUT EDIT of PIC 1 Variables 

Parameter Mismatch with NOBIND 

Library Capable Bit 

Modifications to Support Port 

Inappropriate Warning Messages 

PUT EDIT of Bit Variables 

Bit String Comparisons 

Error TASK IDENTIFIER REQUIRED 

Bi t St ring Defined 

Bit Overlay Defining 

WRITE Without FROM 

Compiler Loop Corrected 

Bad Declaration Caused INVALID 

Lost Text from Compile-Time Pr 

Ques t i on Mark 
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B6000 SERIES MARK 32 

B6000 SERIES PATCH TABLE (PATCH CLOSING FTRS MARKED WITH * •') 
SOFTWARE PATCH PR I NOTE DESCRIPTION 
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PLI 

PL I 

PLI 

PLI 

PLI 

PLI 

PLI 

PLI 

PLI 

PLI 

PLINTRN 

PLINTRN 

PLISUPP 

PLISUPP 

PLISUPP 

PLISUPP 

PLISUPP 

PLISUPP 

PLISUPP 

PLISUPP 

PLISUPP 

PLISUPP 

PLISUPP 

PLISUPP 

PLISUPP 

PRINTAUDIT 

PRINTAUDIT 

PRINTAUDIT 

PRINTAUDIT 

PRINTAUDIT 

PRINTBIND 

PRINTBIND 

PRINTBIND 

PRINTBIND 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIES 

PROPERTIED 

PROPERTIES 

PROPERTIES 

PTNCTL 

PTNCTL 

PTNCTL 

PTNCTL 

RECOVERY 

RECOVERY 

RECOVERY 

RECOVERY 

RECOVERY 

RECOVERY 

RECOVERY 

RECOVERY 

RECOVERY 

RECOVERY 

RECOVERY 

RECOVERY 

RECOVERY 

RECOVERY 

RECOVERY 



32.0.0059* 41645 P3511 Bad Lineinfo 

32.0.0060* 41646 P3S12 External File Variables 

0063* 41636 P3513 " LENGTH (STR I NG(< id>)) " in SUBS 

0064* 41634 P3548 PICTURE Y 

0065* 41632 D3546 Binding Programs with DUMP Opt 

0066* 41631 P3549 ROUND Builtin Function 

0067* 41630 P3550 Level 3 Warning Message 

0068* 41628 P3551 Problem with Pictures 

32.0.0069* 41624 P3593 Large Structures with INITIAL 

32.0.0072* 41617 P3752 Bit Expressions 

0006 41830 D3600 Delete Old Intrinsics 

0014 40264 D3352 Modifications to Support Port 

0007* 39947 P3213 ISAM, DELETE 

0008* 39768 P3214 ISAM, Security Error 

0009* 39771 P3215 ISAM, Duplicate Record Keys 

0010* 39946 P3216 REWRITE, Zero in First Word 

0011* 39767 P3217 Empty ISAM File 

0012 39948 D3394 Implicit Opening of Files 

0013 40264 D3352 Modifications to Support Port 

0014 40250 P3365 ISAM Parity Error to COBOL 

0015 40249 P3366 ISAM Logical Delete 

0016 40251 P3367 PUT EDIT of Bit Variables 
0020* 41638 P3514 PL/I Programdump 
0021* 41637 P3515 PL/I Programdump 
0022* 41633 P3552 GET DATA Loop 

0001 37218 P2760 Use Audit Record Information T 

0005* 37723 P3071 READLOCKNOPURGE Removed 

0006 39981 D3337 Data Base Stack 

0008 40887 D3460 Preal locat ion of Direct Data S 

0009 40887 D3460 Preal locat ion of Direct Data S 
32.0.0002 40135 P3438 BINDINFO for Alternatives 
32.0.0003* 41330 P3596 Eliminate EOF NO LABEL Abort 

0004* 41329 P3597 Handling of Procedure Paramete 

0005* 41332 P3595 Data Base BINDINFO 

0004 37320 D3120 DASDL/REORGANIZATION Enhanceme 

.0006 37540 D3084 Simplification of REORGANIZATO 

.0009 38011 D3170 Shared ACCESSROUTINES, Data Ba 

.0010 38021 D3050 Halt/Load Recovery Sequencing 

.0011 38011 D3170 Shared ACCESSROUTINES, Data Ba 

.0013 38210 D3113 Delete READAHEADB 

.0014 38122 D3116 Put Subsystem ID in Text 

.0015 38197 D3108 New Data Base Stack Structure 

.0016 38134 D3118 Remove Properties for 27 Links 

.0017 38011 D3170 Shared ACCESSROUTINES, Data Ba 

.0019* 38763 P2967 AREASZ Greater Than 65536 Tru 

.0020 38011 D3170 Shared ACCESSROUTINES, Data Ba 

.0021 38762 D3270 Implement COPYAUDIT WFL Deck 

.0022 38759 D3162 DASDL Defaults 

.0023 38011 D3170 Shared ACCESSROUTINES, Data Ba 

.0024 39216 D3274 Structure Calculations 

.0026 39363 D3272 Restructure Description File P 

.0027 38011 D3170 Shared ACCESSROUTINES, Data Ba 

.0028 39217 D3353 DUMPDIR Enhancements 

.0029 39356 D3331 ACCESSROUTINES Error Messages 

.0030 39649 D3317 Crunch PROPERTIES Symbolic 

.0031 39639 D3314 Rebuild Across File Discontinu 

.0032 39981 D3337 Data Base Stack 

.0034 40887 D3460 Preal locat ion of Direct Data S 

.0035 40887 D3460 Preal locat ion of Direct Data S 

.0037 40887 D3460 Preal locat ion of Direct Data S 

.0038 40887 D3460 Preal locat ion of Direct Data S 

.0039* 41770 P3556 Initialization of Disjoint Uno 

.0041 42985 P3814 Incorrect Output Report 

.0001 37540 D3084 Simplification of REORGANIZATO 

.0002 38748 D3466 28 to 29 Conversion Options Re 

.0004 38748 D3466 28 to 29 Conversion Options Re 

.0005 39981 D3337 Data Base Stack 

.0010 37351 P2753 Remove RSFILE Declaration 

.0013 37540 D3084 Simplification of REORGANIZATO 

.0015 38021 D3050 Halt/Load Recovery Sequencing 

.0017 38193 D3051 Switch Back to Primary Audit 

.0018 38196 P2789 Ensure REBUILD Restart 

.0019 38205 P2879 RLA for Abort, Halt/Load Only 

.0020 38201 P2887 Do Not Print Audit Block if EO 

.0022 38011 D3170 Shared ACCESSROUTINES, Data Ba 

.0023* 39200 P3036 Test Generates Too Much Code 

32.0.0024* 37723 P3071 READLOCKNOPURGE Removed 

32.0.0025 38011 D3170 Shared ACCESSROUTINES, Data Ba 

32.0.0026 39385 P3109 Update Disk Header 

32.0.0027 39390 P3144 Read Wrong Audit Block 

32.0.0028 39394 D3289 Allow Normal REBUILD/ROLLBACK 

32.0.0029 39639 D3314 Rebuild Across File Discontinu 

B6000 SERIES MARK 3 2 RELEASE 05 NOVEMBER 1980 PATCHES 



32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 



32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 
32.0. 



32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0. 

32.0 

32 

32 

32 

32 

32 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32.0 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 
















32.0 
32.0 
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B6000 SERIES PATCH TABLE (PATCH CLOSING FTRS MARKED WITH '*') 
SOFTWARE PATCH PRI NOTE DESCRIPTION 
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RECOVERY 


32 


.0 


.0030 


39217 


D3353 


RECOVERY 


32 


.0 


.0031 


39910 


D3452 


RECOVERY 


32 


.0 


.0032 


39981 


D3337 


RECOVERY 


32 


.0 


.0039 


38011 


D3170 


RECOVERY 


32 


.0 


.0040 


40887 


D3460 


RECOVERY 


32 


.0 


.0041 


40887 


D3460 


RECOVERY 


32 


.0 


.0042 


40887 


D3460 


RECOVERY 


32 


.0 


.0043* 


41090 


D3464 


RECOVERY 


32 


.0 


.0044 


41359 


P3567 


RECOVERY 


32 


.0 


.0045* 


41383 


P3491 


RECOVERY 


32 


.0 


.0048* 


41796 


P3667 


RECOVERY 


32 


.0 


.0049* 


41795 


P3668 


RECOVERY 


32 


.0 


.0050* 


41811 


P3669 


RECOVERY 


32 


.0 


.0053* 


42319 


P3757 


RECOVERY 


32 


.0 


.0055* 


42714 


P3820 


REMOTELIB 


32 


.0 


.0005 


38114 


D3085 


REMOTELIB 


32 


.0 


.0006 


38198 


P2881 


REMOTELIB 


32 


.0 


.0007 


38747 


P2864 


REMOTELIB 


32 


.0 


.0008 


38742 


D3230 


REMOTELIB 


32 


.0 


.0009 


39981 


D3337 


REMOTELIB 


32 


.0 


,0012 


41801 


P3707 


REORG 


32 


.0 


,0001 


35471 


D3073 


REORG 


32 


.0 


,0005 


37320 


D3120 


REORG 


32 


.0 


,0006 


37540 


D3084 


REORG 


32 


.0 


.0008 


38009 


D3082 


REORG 


32 


.0 


,0009* 


38004 


P2880 


REORG 


32 


.0 


.0010* 


38203 


P2888 


REORG 


32 


.0 


,0011 


38011 


D3170 


REORG 


32 


.0 


,0012* 


38754 


P2954 


REORG 


32 


.0 


,0013* 


37723 


P3071 


REORG 


32 


.0. 


,0014 


39386 


P3093 


REORG 


32 


.0. 


0015* 


39620 


P3145 


REORG 


32 


.0. 


0016* 


39903 


P3190 


REORG 


32 


0. 


,0017* 


39907 


P3191 


REORG 


32 


,0. 


0018 


39981 


D3337 


REORG 


32 


0. 


0020 


40505 


P3318 


REORG 


32 


0. 


,0021* 


41091 


P3397 


REORG 


32 


0. 


,0022 


41093 


P3401 


REORG 


32 


0. 


.0023 


40887 


D3460 


REORG 


32, 


0. 


,0024* 


41369 


P3492 


REORG 


32 


0. 


0025* 


41358 


P3486 


REORG 


32, 


.0. 


0026* 


41389 


P3484 


REORG 


32. 


0. 


0027* 


41803 


P3670 


REORG 


32 


0. 


.0028* 


41804 


P3671 


REORG 


32 


0. 


0029* 


41807 


P3672 


RESHELPER 


32. 


0. 


0001 


38324 


P3394 


RJE 


32, 


0. 


0002 


37015 


D3255 


RJE 


32. 


0. 


0003 


37261 


D3036 


RJE 


32 


,0. 


0004 


37260 


D3037 


RJE 


32. 


0. 


0005 


37252 


D3038 


RJE 


32. 


0. 


0011 


37985 


P2626 


RJE 


32. 


0. 


0012 


37984 


D2972 


RJE 


32. 


0. 


0013 


37015 


D3255 


RJE 


32. 


0. 


0014 


38103 


D3041 


RJE 


32. 


0. 


0015 


37849 


D3042 


RJE 


32. 


0. 


0016 


38101 


P2746 


RJE 


32. 


0. 


0017 


38098 


D3043 


RJE 


32, 


0. 


0018 


38074 


D3080 


RJE 


32, 


0. 


0019 


38480 


D3078 


RJE 


32. 


0. 


0020 


38477 


P2874 


RJE 


32. 


,0. 


0021 


38479 


P2875 


RJE 


32. 


0. 


0022 


38475 


D3081 


RJE 


32, 


0. 


0023 


38478 


D3079 


RJE 


32 


,0. 


0024 


38476 


D3091 


RJE 


32. 





0025 


38100 


D3234 


RJE 


32. 


.0. 


0026 


38569 


D3092 


RJE 


32, 


0. 


0027 


38567 


D3098 


RJE 


32, 


0. 


0028* 


39028 


P2969 


RJE 


32, 


.0. 


0029 


39029 


D3159 


RJE 


32, 


0. 


0030 


39030 


D3160 


RJE 


32 


.0. 


003 1 


39033 


D3161 


RJE 


32. 


.0. 


0032* 


39034 


P2968 


RJE 


32. 


0. 


0033 


39041 


D3168 


RJE 


32. 


0. 


0034 


39039 


D3166 


RJE 


32. 


0. 


0035 


39036 


D3219 


RJE 


32. 


0. 


0036 


39037 


D3220 


RJE 


32. 


0. 


0037 


39290 


D3247 


RJE 


32. 


0, 


0038 


39294 


P3076 


RJE 


32. 


0. 


0039 


39293 


P3077 


RJE 


32. 


0. 


0040 


39291 


P3078 


RJE 


32. 


0. 


0041 


39489 


P3079 


RJE 


32. 


,0. 


0042 


39491 


D3286 



DUMPDIR Enhancements 
Abort Acceleration 
Data Base Stack 

Shared ACCESSROUTINES , Data Ba 
Preal locat ion of Direct Data S 
Preal locat ion of Direct Data S 
Preal locat ion of Direct Data S 
Quickfix Fails on Inconsistent 
Rollback Fails on FILEDC/STRDC 
Row of Ordered Data Set Locked 
Corrupt Audit Stopper 
Invalid Unit Number 
Option USE DUP 
SEG ARRAY Error 
Split Index Random Tables 
Return Address of Last User Tr 
Eliminate Unused Requestcase V 
Check for Unassigned Transacti 
Elimination of Response From P 
Data Base Stack 
Use Port Files 
REORGANIZATION Acceleration 
DASDL/REORGANIZATION Enhanceme 
Simplification of REORGANIZATO 
Implicit GENERATE Statements 
Eliminate Attribute Error FAMI 
Invalid Block on Standard Data 
Shared ACCESSROUTINES, Data Ba 
Bad BCW for Ordered Data Sets 
READLOCKNOPURGE Removed 
Reorganization of Embedded Ord 
Corruption of Compact Data Set 
Specifying COPY 
Reorganization of Standard Dat 
Data Base Stack 

INVALID INDEX by Zero Length R 
IXSEQ with Multi-Coarse Table 
CFUPDATEVERSION on Pass 1 of F 
Preal locat ion of Direct Data S 
Adding Checksum to Compact Dat 
Invalid Direct Data Set 
CFAUDINZ Only Valid for Audite 
Records with Undefined Record 
Improper Bit Vector Generation 
Disk Resident Structure 
Allow Runs for Disk Pack Types 
Fi I e Transfer 

Print Queue Rebuild at RJE BO 
♦BACKUP Requests Run Asynchron 
MCS Name Display Change 
COPY Syntax Not Checking for B 
PUT/FETCH Record Compatibility 
Fi le Transfer 

WORDS Vs. CHARACTERS in File T 
File Transfer Code Optimizatio 
Autobackup Optimization 
BCL Constructs Removed 
Crunching Transferred Files 
Blank FTS Record at End of FTS 
Bad Queued File Transfer Count 
TIME(l) Vs. TIME(14) 
LOCK PROGRAM 
CHARACTERSPERFTBLOCK 
Host to Host LOGON Loop 
Terminal Transfer 
PUT/FETCH String Field Termina 
Missing EOF 

COMMENCEPF Set on Wrong Print 
File Transfer Unexpected Abort 
Fo names sage Link in REMLP File 
Codefile Record Translation 
B1800 with B9247-13 Train Prin 
ONLINE, OFFLINE By Stationname 
Not Sending 09 Control Message 
Records Larger than File Trans 
Invalid Character Record Trans 
Phone Numbers 
RJE Protocol Version 
RJE PUTREPLY Vs . SYCOM 
Buffer Size Control Message 02 
ABORT COPY Request Vs. SYCOM 
WH Display Enhancement 
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B6000 SERIES PATCH TABLE (PATCH CLOSING FTRS MARKED WITH '*') 
SOFTWARE PATCH PRI NOTE DESCRIPTION 
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RJE 


32. 


0. 


0043 


39494 


D3287 


RJE 


32. 


0. 


0044 


39493 


P3126 


RJE 


32. 


0. 


0045 


37015 


D3255 


RJE 


32. 


0. 


0046 


39536 


P3151 


RJE 


32. 


0. 


0047 


39541 


P3202 


RJE 


32. 


0. 


0048 


40038 


D3346 


RJE 


32. 


0. 


0049 


40044 


D3392 


RJE 


32. 


0. 


0050 


40047 


P3345 


RJE 


32. 


0. 


0051* 


40049 


P3346 


RJE 


32. 


0. 


0052 


40050 


D3423 


RJE 


32. 


0. 


0053 


40053 


D3424 


RJE 


32. 


0. 


0054 


40054 


D3428 


RJE 


32. 


0. 


0055 


40055 


D3429 


RJE 


32. 


0. 


0056* 


40058 


P3439 


RJE 


32. 


0. 


0057* 


40059 


P3440 


RJE 


32. 


0. 


0058* 


40063 


P3441 


RJE 


32. 


0. 


0059 


40061 


D3475 


RJE 


32. 


0. 


0060 


41160 


D3476 


RJE 


32. 


0. 


0061 


40053 


D3424 


RJE 


32. 


0. 


0062* 


41168 


P3678 


RJE 


32. 


0. 


0063* 


41169 


P3682 


RJE 


32. 


0. 


0065* 


42461 


P3753 


RJE 


32. 


0. 


0066* 


42463 


P3754 


RJE 


32. 


0. 


0068 


42465 


D3639 


RJE 


32. 


0. 


0069 


42466 


P3777 


RJE 


32. 


0. 


0070 


42469 


P3778 


RJE 


32. 


0. 


0071 


42470 


P3779 


RJE 


32. 


0. 


0072 


42471 


D3640 


RJE 


32. 


0. 


0073 


42465 


D3639 


RJE 


32. 


0. 


0074* 


42463 


P3754 


RJE 


32. 


0. 


0075 


42471 


D3640 


RJE 


32. 


0. 


0076* 


42463 


P3754 


RJE 


32. 


0. 


0077 


42509 


P3804 


RJE 


32. 


0. 


0078 


42510 


P3805 


RJE 


32. 


0. 


0079 


42511 


P3806 


RJE 


32. 


0. 


0082 


42469 


P3778 


RJE 


32. 


0. 


0083 


42504 


P3807 


RJE 


32. 


0. 


0084 


42505 


P3808 


RJE 


32. 


0. 


0085 


42506 


P3809 


RJE 


32. 


0. 


0086 


42507 


P3810 


RJE 


32. 


0. 


0087 


42508 


P3811 


SCRMCP 


32. 


0. 


0195 


38261 


P2812 


SCRMCP 


32 


.0. 


0222 


38265 


P2853 


SCRMCP 


32. 


,0. 


0227 


38264 


P2858 


SCRMCP 


32 


,0. 


0236 


38262 


D3072 


SCRMCP 


32 


,0, 


0250 


38264 


P2858 


SCRMCP 


32 


,0. 


0252 


38267 


P2891 


SCRMCP 


32 


,0. 


0271 


37674 


D2970 


SCRMCP 


32 


.0. 


0287 


37674 


D2970 


SCRMCP 


32 


.0. 


.0295 


38490 


P2922 


SCRMCP 


32 


.0. 


.0296 


38491 


P2923 


SCRMCP 


32 


.0. 


.0305 


37674 


D2970 


SCRMCP 


32 


.0 


.0310* 


38272 


P2957 


SCRMCP 


32 


.0 


.0350 


38274 


P2794 


SCRMCP 


32 


.0 


.0366 


37674 


D2970 


SCRMCP 


32 


.0 


.0387 


38280 


P3005 


SCRMCP 


32 


.0 


.0414 


38283 


P3049 


SCRMCP 


32 


.0 


.0445 


38285 


P3069 


SCRMCP 


32 


.0 


.0461 


38286 


D3256 


SCRMCP 


32 


.0 


.0520 


38291 


P3123 


SCRMCP 


32 


.0 


.0637 


38286 


D3256 


SCRMCP 


32 


.0 


.0716 


38310 


D3342 


SCRMCP 


32 


.0 


.0726 


38312 


D3345 


SCRMCP 


32 


.0 


. 1006 


38332 


P3459 


SCTABLEGEN 


32 


.0 


.0001 


37702 


D3054 


SCTABLEGEN 


32 


.0 


.0002 


40663 


D3356 


SCTABLEGEN 


32 


.0 


.0003 


40663 


D3356 


SCTABLEGEN 


32 


.0 


.0004 


40663 


D3356 


SCTABLEGEN 


32 


.0 


.0005 


40663 


D3356 


SCTABLEGEN 


32 


.0 


.0006 


40663 


D3356 


SCTABLEGEN 


32 


.0 


.0007 


40663 


D3356 


SCTABLEGEN 


32 


.0 


.0009 


40663 


D3356 


SCTAELEGEN 


32 


.0 


.0010 


40663 


D3356 


SCTABLEGEN 


32 


.0 


.0012 


40663 


D3356 


SCTABLEGEN 


32 


.0 


.0013 


41710 


D3550 


SCTABLEGEN 


32 


.0 


.0014 


40663 


D3356 


SCTABLEGEN 


32 


.0 


.0015 


40663 


D33S6 


SCTABLEGEN 


32 


.0 


.0016 


40663 


D3356 


SCTABLEGEN 


32 


.0 


.0018 


42 501 


D3641 


SCTABLEGEN 


32 


.0 


.0021 


42501 


D3641 


SCTABLEGEN 


32 


.0 


.0022 


42848 


D3647 


SORTMCP 


32 


.0 


.0398* 


39094 


D3233 



SM Command LEVELS 

Protocol Version Mismatch 

Fi le Trans f er 

SM Command 

File Transfer Security 

RJE Vs. DLBACKUP 

File Starting with "?" Lost Bl 

Extra Linkfile Updates Removal 

Linkf i 1 e Updates 

DEBUG vs RAID 

SM Commands RSC, SPO 

Bad Device Address 

Halt /Load Restore 

Lost Available Records 

Invalid Printer Characters 

Disconnect of Switched Lines a 

Runtime Options Save Through L 

Programdump Out of FILEX, FILE 

SM Commands RSC, SPO 

PB of Files Without Summary 

Remove Summary File 

"RS0" in Printer Backup Record 

Abort Compatibility 

RJE Vs. SYCOM 

File Transfer Input Block Size 

"##RJE"" Message Removed 

Object System in Symbolic Head 

ODT to ODT Communication 

RJE Vs. SYCOM 

Abort Compatibility 

ODT to ODT Communication 

Abo r t Compa t i b i 1 i t y 

Station Logoff at RJE QUIT 

"22 Control Message NO-OP" 

Copy Requests Rejected 

"##RJE"" Message Removed 

Parity Error on REMLP Files 

AUTOPRINT INVALID INDEX 

Send Control Length Update 

Length of "*RS" Reply 

Incorrect Backup Family 

Correct Fault Message 

INVALID OP for COMPARE BUFFER 

7A Magtape Controls 

BUFFMEM Modifier Added 

7A Magtape Controls 

Stop Repeating First Line of O 

IVR Faci 1 i ty 

IVR Faci 1 i ty 

Memory Mods for Maintenance, G 

SCR/MCP Version 

IVR Faci 1 i ty 

Buffer with Address Specified 

Pack Density Not Established P 

IVR Faci 1 i ty 

Wrong Density for File I/O 

IVR Write Disabled Pack 

VERIFY DISKPACK (SELECT ALL RE 

IVR for 215,225 Packs 

Warning Message 

IVR for 215,225 Packs 

IVR Type 206 Packs 

IVR Type 207 Packs 

AX More Than 60 Characters for 

SWAPPER Enhancements 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

Eliminate DL Network 

New and Old ODT Messages 

New and Old ODT Messages 

New and Old ODT Messages 

Compile Time Options 

Compile Time Options 

TD Accelerat ion 

Tape Work File 

B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 PATCHES 
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B6000 SERIES PATCH TABLE (PATCH CLOSING FTRS MARKED WITH **') 
SOFTWARE PATCH PRI NOTE DESCRIPTION 
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SORTMCP 


32 


.0 


.0938* 


40830 


P3374 


SORTMCP 


32 


.0 


. 1122* 


42092 


P3624 


SOURCENDL 


32 


.0 


.0002 


38478 


D3079 


SOURCENDL 


32 


.0 


,0003 


38100 


D3234 


SOURCENDL 


32 


.0 


.0004 


39299 


D3613 


SOURCENDL I I 


32 


.0 


,0020 


42005 


D3602 


TFL 


32 


.0 


,0004* 


39206 


P3073 


TFL 


32 


.0 


,0005 


39652 


D3320 


TFL 


32 


,0 


,0006 


39667 


P3194 


TFL 


32 


,0, 


.0007* 


39902 


P3195 


TFL 


32 


,0. 


,0008 


39981 


D3337 


TFL 


32 


.0. 


.0009* 


39979 


D3336 


TFL 


32 


.0. 


,0011* 


41769 


P3557 


TFL 


32 





,0012* 


41806 


P3675 


TFL 


32 


,0 


0013* 


41818 


P3674 


TR INTERFACE 


32 





,0001 


38202 


P2889 


TR INTERFACE 


32 


.0 


0002 


39981 


D3337 


TR INTERFACE 


32 


.0. 


0003* 


40194 


P3242 


TRPROPERTY 


32 


.0. 


0003 


38202 


P2889 


TRPROPERTY 


32 


.0. 


.0004 


39650 


D3321 


TRPROPERTY 


32 


,0 


,0005 


39659 


D3322 


TRPROPERTY 


32. 


.0. 


.0006 


39981 


D3337 


TRPROPERTY 


32 


.0. 


0007 


40199 


D3367 


TRPROPERTY 


32. 


,0. 


0009* 


41818 


P3674 


TRUTILITY 


32. 


,0, 


0003 


38202 


P2889 


TRUTILITY 


32, 


.0. 


0004 


38747 


P2864 


TRUTILITY 


32. 


.0. 


0005* 


39378 


P3104 


TRUTILITY 


32. 


,0. 


0006 


39981 


D3337 


TRUTILITY 


32. 


.0. 


0008 


40530 


P3388 


TRUTILITY 


32, 


0, 


0009* 


41392 


P3715 


UDSTRCTTAB 


32, 


0. 


0002 


39082 


D3221 


UDSTRCTTAB 


32. 


0, 


0003 


40366 


D3364 


UDSTRCTTAB 


32, 


0. 


0004 


40547 


D3415 


UDSTRCTTAB 


32. 


0. 


0005 


40546 


D3477 


USERSTRUCT 


32, 


0, 


0002* 


41509 


P3583 


USERSTRUCT 


32. 


.0. 


0003 


42062 


D3605 


UTIL 


32, 


0. 


0015 


38037 


D3052 


UTIL 


32, 


0. 


0016 


38138 


P2955 


UTIL 


32. 


0, 


0017* 


38760 


P2956 


UTIL 


32. 


0. 


0018 


38011 


D3170 


UTIL 


32. 


0. 


0019* 


38753 


P2999 


UTIL 


32 


0. 


0020 


39217 


D3353 


UTIL 


32. 


0. 


0021 


39376 


P3108 


UTIL 


32. 


0. 


0023 


39625 


P3146 


UTIL 


32. 


0. 


0024* 


39628 


P3192 


UTIL 


32. 


0. 


0026 


39639 


D3314 


UTIL 


32. 


0. 


0027 


39661 


P3193 


UTIL 


32. 


0. 


0028 


39981 


D3337 


UTIL 


32. 


0. 


0029 


39989 


D3338 


UTIL 


32. 


.0. 


0030* 


39991 


P3243 


UTIL 


32. 


0. 


0031* 


39985 


P3244 


UTIL 


32. 


0. 


0032 


39627 


P3261 


UTIL 


32 


0. 


0035 


40203 


P3258 


UTIL 


32. 


.0. 


0038 


39217 


D3353 


UTIL 


32 


.0. 


0039 


40523 


P3343 


UTIL 


32. 


,0. 


,0040* 


40963 


P3373 


UTIL 


32. 


,0. 


0041 


40887 


D3460 


UTIL 


32, 


0, 


0042 


40887 


D3460 


UTIL 


32 


,0. 


.0043 


40887 


D3460 


UTIL 


32 


.0. 


0044 


40887 


D3460 


UTIL 


32 


,0, 


,0045* 


40922 


P3389 


UTIL 


32 


,0, 


,0046 


40923 


P3390 


UTIL 


32 


,0 


,0047* 


40924 


P3391 


UTIL 


32 


,0 


,0048* 


40926 


P3392 


UTIL 


32 


,0, 


,0049 


41244 


P3402 


UTIL 


32 





,0050 


41104 


P3403 


UTIL 


32 





0051* 


41111 


P3404 


UTIL 


32 





,0052 


41114 


P3405 


UTIL 


32 


,0 


.0053* 


41358 


P3486 


UTIL 


32 


.0 


.0054* 


40915 


P3493 


UTIL 


32 





0055* 


41389 


P3484 


UTIL 


32 


.0. 


0056* 


41382 


P3495 


UTIL 


32 


,0. 


.0057 


41772 


D3571 


UTIL 


32 


.0 


0058 


41791 


P3586 


UTIL 


32, 


.0 


0059 


41789 


P3702 


UTIL 


32 


,0. 


0060* 


41790 


P3616 


UTIL 


32 


,0 


0062 


41797 


P3704 


UTIL 


32 


,0 


,0063 


41802 


P3705 


UTIL 


32 


.0 


,0065* 


41112 


P3673 


UTIL 


32 


.0 


,0066 


41831 


P3690 


UTIL 


32 


.0 


.0067* 


41390 


P3714 


UTI LOADER 


32 


.0 


.0020 


40344 


D3332 



Protected Disk Files Used as S 

Large Memory Size Specified 

CHARACTERS PERFTBLOCK 

Terminal Transfer 

ACIII/BDLC BTB Request 

Implement ASCII-APL for NSP Da 

Expand Text Generation Array 

Crunch NEWSOURCE File 

Error Message 

Header Displays Correct System 

Data Base Stack 

Parameters Not Specified 

Hyphenated RESTARTDATASET Iden 

Infinite Loop 

Table Size Exceeded 

Increase Number of Files in Jo 

Data Base Stack 

Correct Offset Generation 

Increase Number of Files in Jo 

Crunch TRBASE/PROPERTIES Symbo 

TASKVALUE Attribute 

Data Base Stack 

Simultaneous READ/WRITE Access 

Table Size Exceeded 

Increase Number of Files in Jo 

Check for Unassigned Transacti 

Search Using Alpha Items as Ke 

Data Base Stack 

Output Entire RANGE Specificat 

Compilation Fails with Syntax 

SYSTEMUSER Bit Moved 

Automatic DESTNAME for CANDE S 

Non Interactive APL 

APL-Detached Workspace 

Use LONG Array Masksearch 

New UDSTRUCTURETABLE Generatio 

Clear TPS Information 

Version Times tamp Mismatch 

Print Tape Labels 

Shared ACCESSROUTINES , Data Ba 

Failure to Reload Beyond Two D 

DUMPDIR Enhancements 

DMCONTROL Re sequenced 

Output Header 

Printing Control Information 

Rebuild Across File Discontinu 

Lower Case in Parameter String 

Data Base Stack 

Print Statistics Option 

Corrupted Dump time Time stamp 

Error Not Given for Invalid Sy 

No Checksum on Block Zero 

Normal Vs. Direct Files as Par 

DUMPDIR Enhancements 

Structure Details 

INVALID INDEX in INITIALIZE 

Preal locat ion of Direct Data S 

Preal locat ion of Direct Data S 

Preal locat ion of Direct Data S 

Preal locat ion of Direct Data S 

LIST, WRITE Statements 

LIST, WRITE of Block Zero 

LIST, WRITE Fail to Print Some 

Block Limits for WRITE, LIST 

FLUSHDB Default 

BUILDDUMPDIRECTORY Not Accept e 

Syntax Errors 

DIRECTION Attribute Error 

Invalid Direct Data Set 

COPY ONTO May Not Update EOF P 

CFAUDINZ Only Valid for Audite 

Workers Restartable Only Once 

Tape SERIALNO Specification 

Validate Block Range for LIST, 

Display Nonfatal Errors, Warni 

Handling of Hyphens 

Deadlock 

Multiple Dumpworker Error 

Multiple Row control Files 

Checksum Error for Block Zero 

Recover Family Index 

UTI LOADER on MLIP Systems 



B6000 SERIES MARK 32 RELEASE 05 NOVEMBER 1980 PATCHES 



PAGE 499 



B6000 SERIES MARK 32 

B6000 SERIES PATCH TABLE (PATCH CLOSING FTRS MARKED WITH '*') 
SOFTWARE PATCH PRI NOTE DESCRIPTION 



WFL 


32 


.0. 


,0003 


38055 


D3123 


WFL 


32 


.0. 


.0004* 


37383 


P2747 


WFL 


32 


.0, 


,0005* 


37376 


P2748 


WFL 


32 


.0. 


.0006* 


37387 


P2749 


WFL 


32 


.0, 


,0009 


38188 


D3090 


WFL 


32 


,0 


,0011 


39063 


D3252 


WFL 


32 


.0 


0016 


37414 


D3293 


WFL 


32 


,0. 


.0018 


38466 


D3295 


WFL 


32 


,0 


,0019 


38465 


D3296 


WFL 


32 


,0. 


,0024* 


39878 


P3263 


WFL 


32 


,0, 


,0025 


39739 


D3361 


WFL 


32 


.0 


0031* 


41320 


D3528 


WFL 


32. 


,0. 


.0034* 


41413 


P3520 


WFL 


32 


,0. 


.0035* 


41428 


D3547 


WFL 


32 


,0 


0036 


41710 


D3550 


WFL 


32 





.0037* 


41843 


P3584 


WFL 


32 





.0039* 


41845 


P3623 


WFL 


32 


,0, 


.0040 


41866 


P3695 


XREFANALY 


32 


.0, 


.0002 


39235 


P3147 


XREFANALY 


32 


,0. 


.0003 


40640 


P3332 


XREFANALY 


32 


,0, 


0004 


41317 


P3518 


7ABMTEST 


32 


, 0. 


.0001 


38308 


P3377 



B6900 Peripheral Test Driver 

Correctly Compare File and Tas 

Job on Disk with NEWSOURCE, SY 

Pass Global Files to Processed 

Compiler Info Word in Seg Zero 

Semidependent Tasks, VISIBILIT 

Remote Job Transfer 

Data Base Equation Allowed 

BCL Warning 

Task Passed as By Reference Pa 

Segment Code Files 

Improved Handling of "SINCLUDE 

Missing Comma in ON Statement 

LOCKED in Task Attribute Assig 

Eliminate DL Network 

FAMILY Specification, "<name c 

Prevent WFL Faul t 

Syntax "Old" WFL Data Base, Li 

Add DATABASE as XREF Item 

Remove PORT, SIGNAL Variable T 

Correctly Identify CHARACTER A 

Count READ and WRITE Errors 



DMALGOL Implementation 



B6000 SERIES MARK 32 

The following document describes the DMALGOL language, which was implemented in 
previous releases and documented in the Mark 31 system release. Changes since the Mark 
31 release are indicated by PCN bars in the right margin. 

1 . INTRODUCTION 

DMSII requires a special compiler for two reasons: The compiler must be able to 
retrieve information from the description file and it must build stack structures which 
are different from those in ALGOL. DMALGOL consists of ALGOL with extensions to meet 
these requirements. 

The DMALGOL language is an "implementation" language for the DMSII system and is not 
intended for general use. New features may be added at any time and existing features 
™.?»SSt C anged or de,eted without notice. For this reason, users should not rely upon 
DMALGOL as an application programming language. 

2 . OVERVIEW 

2.1 Compile Time Facilities 



DMALGOL compile-time facilities consist of elements which are of a general nature and 
have been documented in ALGOL, and elements specific to DMSII. 

The basic technique used to write the ACCESSROUTINES is conditional compilation. 
Various P'eces of code are omitted, included and parameterized based on information 
™.??™? e , SDL descr, P t,on fil e- This file is read by the DMALGOL compiler; the 
DMALGOL language contains elements used to conveniently reference its information. 

NODE variables and PROPERTY definitions are used to reference "nodes" within the 
description file. A node is a data structure which consists of two parts: a list and a 
set of properties, either of which may be absent. The elements of lists are frequently 
other nodes, but they may be integers or other data items. The syntax in DMALGOL to 
reference list element I of node N is N[I]. The properties of a node are in a 
non-homogeneous substructure whose format is defined by PROPERTY declarations. 

Exampl e : 

NODE N; 

INTEGER T; 

PROPERTY RECORDSZ= [ 1 1 1 . [ 1 1 : 1 2 1 ; 

T:=N.RECORDSZ; 

This will extract the property RECORDSZ of the node N. The properties actually used in 
the ACCESSROUTINES arc included from the file called DATABASE/PROPERTIES. 

A special form of the 'FOR statement is used to access the members of a node's list 
It uses the fact that DASDL stores the number of list items at OFFSET=0 in the list so 
that the compiler knows how many elements are in the list. 

Exampl e : 

NODE STRUCTURE, SPANSET; 

'FOR EACH SPANSET OF STRUCTURE DO . . . 

This statement goes through each member of the list belonging to the node STRUCTURE 
assigning its successive list elements to the node SPANSET. 

n»2Rf° ial f ° rm ° f the ' INCLUDE statement is used to access the text section of the 
DASDL description file. This section consists of a set of source language DMALGOL 
constructs; these "texts" are always referenced via an appropriate property For 
example, data set nodes contain a property called VERIFYSTORETEXT which checks whether 
a record meets all verification rules before it is stored. To access this text for 
node DS, the following would be written: 

' INCLUDE DS . VERIFYSTORETEXT . 

DMALGOL would extract the appropriate text and compile it. 



2.2 Environments 



A normal ALGOL program contains block initialization code to reserve space in the stack 
for its local variables. DMSII SIB environments, however, are not contained in a 
running stack and cannot, therefore, execute code to build the stack. Rather, the MCP 
procedure DMSOPEN sets up the stack variables based on an "image" of the SIB stack keot 
in the ACCESSROUTINES code file. Thus, one task of DMALGOL is to build the stack 
image. This is done by using the ENVIRONMENT declaration, which delimits the 
boundaries of each environment, in much the same way as a procedure declaration does. 



A- 2 
B6000 SERIES MARK 32 

Environments may not be nested more than three deep. 

The ACCESSROUTINES code file is an executable program that builds the DBS and then 
freezes in a special way using the DMSFREEZE construct of DMALGOL. Code is generated 
so that the outermost environment begins execution, sets up its stack, executes its 
outer block and then calls the last compiled environment at the next level. Each ot 
these inner environments in turn builds its portion of the stack, executes its outer 
block, and then calls the next environment. The last environment called (the first 
inner environment compiled) is a special environment that executes the DMSFREEZE 
statement which signals the MCP that the DBS has been built. 

DMSII uses environments at all three levels. The outermost environment contains global 
variables common to the entire data base. Intermediate level environments, DBS 
environments, contain variables unique to each data base structure. The innermost 
environments, SIB environments, contain the variables which are unique to a single 
invocation of a structure. 

It is possible to call a procedure in a different environment uising the following 
cons t rue t : 

<procedure name> * <structure number> 

structure number> is the number declared in the ENVIRONMENT declaration containing the 
desired procedure. 

Example : 

ENVIRONMENT X OF 2 ; 
BEGIN 

PROCEDURE P; 
END; 

ENVIRONMENT X OF 3 ; 
BEGIN 

PROCEDURE P; 

P; 

p. 2 

END; 

The call P wi 1 1 call the routine in its local environment; i.e., the second one. The 
call P'2 will call the routine in environment 2; i.e., the first one. 

2.3 Reference Variables 



DMALGOL provides the ability to declare procedure reference variables, f 1 1 e reference 
variables and direct file reference variables. These reference variables allow for 
dynamic selection of procedures, files and direct files within the DMSII system. 

2.4 "ONCE ONLY" Compilation 

The outermost and intermediate level environments act like procedures and may contain 
any declarations that a normal procedure may contain. Since the innermost environments 
do not have stack building code generated for them, restrictions are placed on the type 
of declarations that can be used. In particular, three or more dimensional arrays, 
task arrays, queues, libraries, etc., may not be declared in the innermost 
envi ronment s . 

Each structure of the data base has one D3 and one D4 environment compiled for it. The 
same lines in DATABASE/ SYMBOLIC are typically compiled many times over. For example, 
the procedure STORE is compiled for every data set Condi t ronal compile-time 
statements alter it to fit each successive data set; each has its own VERIFYSTORETEXT 
included, for example, and calls to insert it into each of its automatic sets. 

Some procedures, however, do not differ in any major respect between two structures of 
the same type. An example is GENERATE; the main difference in its operation is the 
block size and end-of-file, which are easily parameterized. To save compile time and 
code space, such procedures are compiled only once. It is not possible to use calls on 
the shared procedure using the procedure name> ' <s t rue t ur e number> syntax, since that 
would change the environment as well. Rather, a PCW is constructed for each structure; 
for a shared procedure, the PCW in each structure will point to the same segment 
descriptor. This allows the procedure to be both shared by different environments, but 
behave as if it were local to each environment. 

-, . DMALGOL EXTENSIONS 

3.1 Compile-Time Facilities 

3.1.1 NODE Declaration 
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Syntax : 

— NODE <ident i f ier> | 

|- :=<ar i thme t i c expression 1> -| 

Semant ics : 

1. An identifier declared to be a NODE is a compile-time variable similar to a NUMBER; 
however, it must be used in conjunction with a compi 1 e-t ime array created by DASDL. ' 

2. A node variable represents an index into the DASDL array. 

3. The value of a node variable (index into the DASDL array) may be changed at any time 
during compilation by means of a compi 1 e-t ime 'LET statement. 

4. ^arithmetic expression 1>, if used, must be a constant arithmetic expression. It 
represents the initial index of the node variable. By default, the initial value is 
zero, which is otherwise an illegal value; thus, a node must be initialized or 
assigned a value before it is used. 

5. Normally, the node variable represents the index of a "node" in the DASDL array. A 
list and a set of properties is associated with a node; the list is usually a list 
of nodes, and the properties contain values. The node variable may be used to 
reference members of the list and values of the properties, as follows: If N is a 
node variable and P is a property identifier, then N[<i>] is the <i>th member of the 
list of N, and N.P is the value of the property P of N (<i> is a constant or 
constant expression). 

3.1.2 PROPERTY Declaration 

Syntax : 



PROPERTY 

I — < typo— I 

I < j 

> <identifier> — = — <property spec>- 

<property speo 

— [ — <arithmetic expression 1> — ] — 



[<arithmetic expression 2> : <ar i thme t i c expression 3>] 



Semant ics : 

1. A property identifier defines the location and format of a property value associated 
with a node in the DASDL array. 

2. Each arithmetic expression must be a constant arithmetic expression. <arithmetic 
expression 1> specifies the word in the property set. <arithmetic expression 2> and 
<arithmetic expression 3> specify a field within the word; if they are not given, 
the entire word is used. 

3. If a type is declared, it must be a single-precision arithmetic or Boolean; when no 
type is specified, REAL is assumed. 

4. A property identifier is used only with a node variable, as follows: 

— <node variable> — . — <property identifier — | 

This construct represents the value of the property for the given node. It may be 
used wherever constants of the specified type may appear. 
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5. The "node property" construct is only used to retrieve a value from the DASDL array; 
it may not be used to change a property value (in fact, no construct can change the 
\SDL array: it is read-only). 

3.1.3 'FOR Statement Extensions 



Syntax : 

— 'FOR EACH <nodeid 1> OF — <nodeid 2> 

|- ALL — I |-<number id>-| 

> DO <ct statement>- 

- WHERE — <boolean express ion>- | |-<begin clause>- 



<begin clause> 

— 'BEGIN — <text 1>— 'NEXT — <text 2>— 'PRIOR ~<text 3> > 

>- 'END 1 

Semant ics : 



1. This statement provides for iterative compilation of ALGOL source code. One 
iteration is made over the source code for each entry in the list belonginj 



ig to 



<nodeid 2>, 
2. <nodeid 2> must be the index of a node in the DASDL array. 



3 For each iteration, the control variable is assigned the index of the list element 
(if <nodeid 1> is specified) or the contents of the list element (if <number id> is 
speci f ied) . 

4 =If the WHERE clause is used, a constant <boolean expression> must be specified. 
Before the statement following DO is processed but after the control variable has 
assumed its next value, the <boolean expression> is evaluated. If the expression is 
TRUE, the statement following DO is processed; otherwise, the statement is ignored. 

5 If the body of the 'FOR statement is the 'BEG IN- 'NEXT- 'PR I OR- 'END form, a 
"telescoping" form of iteration is performed. In that case, the "NEXT behaves like 
an 'END, so that the <text 1> is processed for each iteration. After the last 
iteration, <text 2> is processed just once. Finally, the iteration is repeated, 
backwards, for <text 3>. If a WHERE clause is used, the backwards iteration 
processes exactly the same cases as the first iteration; i.e., the <boolean 
expression> is not re-evaluated while backing out of the telescope. 

6.=<ct statement> is a compi le-t ime statement including any DMALGOL extensions. 

3.1.4 'INCLUDE Statement Extensions 

Syntax : 

— 'INCLUDE — <nodeid> — . — <property id> — | 

Semant i cs : 

1. This statement causes the compiler to process text directly out of the DASDL array. 

2 The value of the specified property is assumed to be an index of text in the DASDL 
array. That text must be terminated by a pound sign (#) and at least one null 
character (4"00"). 

3. The compiler does not expand defines in data base declarations where the define 
identifier was the result of a compile-time INCLUDE statement. 

3.1.5 'LET Statement Extensions 



Syntax : 

— 'LET — <number variable> — := — <procedure name>- 
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Semant ics : 



This statement stores a copy of the procedure's PCW in the number variable. This 
construct is intended for use with compile once only procedures. Refer to the section 
on "ONCE ONLY" Compilation for additional details. 



3.1.6 'PRINT, 'ERROR, 'DISPLAY Statements 

Syntax : 

"PRINT 

'ERROR — 
- 'DISPLAY 



-<node id> 

-< s t r i ng> 

-<ar i thme t i c expression;. 



Semant i cs 

1. This statement causes one or more lines to be printed on the compilation listing. 

2. Each line may contain up to 87 characters, starting in position 18. 

3. If the 'ERROR form is used, the compiler's error count is incremented by one, and 
the printed line is bracketed by the ">" and "<" characters, as for a normal syntax 
error message. 

4. The lines are created from the information given in the statement, as follows: 

a. If a <nodeid> is specified, the alpha name property for the node is inserted into 
the 1 ine . 

b. If a string is specified, it is inserted into the line. 

c. If an (arithmetic expression> is used, it must be a constant arithmetic 
expression. It is assumed to be an integer, and the value of the integer, zero 
suppressed, is inserted into the string. 

No blanks are inserted into the line between specified items. 

5. If a 'PRINT or 'ERROR statement is processed (not skipped) by the compile-time 
processor, the lines are printed whether or not any listing $ card options are set 
(LIST, LISTOMIT, etc.). 



3.1.7 PROCEDURE Declaration Extensions 

Syntax : 
Form 1 : 
— PROCEDURE — <procedure id 1>— 



-<procedure id 2>- 



Form 2: 

— <procedure type> — PROCEDURE — (procedure heading> — ; 

>- EXTERNAL — <number variable> 



Semant ics: 



Two forms of procedure declaration are used for compile once only procedures 
the section on "ONCE ONLY" Compilation for additional details. 



Refer to 



3.2 



ENVIRONMENT Declaration 



Syntax : 



A- 6 
B6000 SERIES MARK 32 



— ENVIRONMENT — <ident i f i er> > 

>- ( <arithmetic expression 1> ) > 

> > 

- OF < arithmetic expression 2> -| 



>-- 

|-<block head> <compound tail>- 

- END 



S em ant ics : 

1 The ENVIRONMENT declaration is used to declare the contents of the Data Base Stack 
(DBS) and Set Information Block (SIB) stacks for a data base. 

2.=The entire "program" for a data base is an environment containing all data base 
global s . 

3 =Following the data base globals, one or more DBS environments may be declared. 
One DBS environment is present for each data set or set in the data base. 

4. Within each DBS environment, and after other DBS items, one or more SIB environments 
must be declared. 

5 The identifier specified in the ENVIRONMENT declaration is primarily for 
documentation; it is not used again. arithmetic expression 1> is a constant used 
to aid structure allocation within the ACCESSROUTINES . arithmetic expression 2> (a 
constant, normally a node variable) is the environment identification. Every DBS 
environment must have a distinct environment identification. Each SIB environment 
must have an environment id equal to that of the DBS which contains it. The outer 
level environment is not declared with an environment id. 

6 In a DBS environment, only global items and DBS items declared in that DBS are 
accessible. In a SIB environment, all global items, all items in the corresponding 
DBS environment, and all SIB items are accessible. In addition, all procedures 
declared in prior SIB environments are accessible. Those procedures are referenced 
via dynamic identifiers, using the environment id after the apostrophe. 

7 For the innermost (SIB) environments, the <block head> must be followed by "END"; 
i.e., the SIB environments may not have any executable statements in their outer 
block. 

3.3 Reference Variables 



3.3.1 PROCEDURE References 



Declaration Syntax: 

(Form 1) 

— PROCEDURE REFERENCE — <procedure reference id>- 

>-<procedure id> 



(Form 2) 

— PROCEDURE REFERENCE — <procedure reference id>- 

>-<formal parameter part> — <procedure body> 



Assignment Syntax: 

— <procedure reference id 1> — 

> < procedure id> 

|-<procedure reference id 2>- 
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Semant ics : 



Form 1 of the declaration declares the procedure references variable <procedure 
reference id>. The initial value of this variable refers to <procedure id>. The 
parameter description for <procedure reference id> is derived from <procedure id>. 

Form 2 of the declaration declares the procedure reference variable <procedure 
reference id 1>, specifies the parameter description for the reference variable and 
specifies a body of code to be executed if <procedure reference id 1> is used before an 
assignment is done to it. 

The procedure reference assignment statement causes the <procedure reference id 1> to 
refer to the procedure specified on the right side of the ":=". Both procedures must 
be of the same type and have the same parameter descriptions. 

A <procedure reference id> may be used to invoke a procedure as if the procedure were 
invoked directly. 

3.3.2 File References 

Declaration Syntax: 

FILE REFERENCE <file reference id> ; — | 

|- DIRECT -| 

Assignment Syntax: 

— < f i I e reference id 1> — := <file id> ; — | 

|-<file reference id 2>-| 

Semant ics : 

1. Prior to being assigned a value, a procedure reference variable does not point to a 
file. 

2. In the file reference assignment statement, the left and right file identifiers must 
both be DIRECT or must both be non-DIRECT. 

3.4 "ONCE ONLY" Compilation 

Compile once only procedures may be declared in two ways. 
3.4.1 Form I 



Syntax : 

<procedure declaration) 

— PROCEDURE — <procedure id 1> — := — <procedure id 2>- 



Exampl e : 

BOOLEAN PROCEDURE GETADDRESS (A) ; 
VALUE A; 
REAL A; 
BEGIN 



END; 
PROCEDURE GETADDR := GETADDRESS; 
Semant ics: 
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This is the most common type of compile once only procedure. ^procedure id 1> and 
Procedure id 2 are identical. The parameters and procedure type of the two 
procedures mist be exactly the same The body of the procedure is ««P'»«2ced«e 
once Subsequent references to the procedure merely copy the PCW for procedure 
id 2> into the environment that contains <procedure id l>. 

This technique can only be used for procedures declared in the outer block of a 
DBS or SIB environment. Embedded procedures must use the .1 t ernate form of 
compile once only. 



3.4.1 Form 2 



Syntax : 

<let statement> 

— 'LET — <number variable>— := — procedure name>— | 

<procedure declaration> 

— procedure type>— PROCEDURE — <procedure heading> > 

>- ; — EXTERNAL — <number variable> 1 

Example: ___ 

NUMBER GETADDRESSPCW; 
BOOLEAN PROCEDURE GETADDRESS (A) ; 

VALUE A; 

REAL A; 

BEGIN 

END; 
'LET GETADDRESSPCW := GETADDRESS; 

BOOLEAN PROCEDURE GETADDR (A); 
VALUE A; 
REAL A; 
EXTERNAL GETADDRESSPCW; 

Semant ics : 

user 

:k 

the 

re 

or iginal pi 

decl arat ion. 

3. 5 DMIO File Attribute 

The DMIO direct f i le .attribute is used by the ACCESSROUTINES to indicate that the DMSII 
system is using the file. 

3.6 DMALGOL Functions and Statements 

3.6.1 ALLOW and DISALLOW Statements 

Syntax : 

ALLOW | 

|- DISALLOW -| 

Semant ics : 
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The DISALLOW statement disables external interrupts. The ALLOW statement enables 
external interrupts. These statements are intended for use in the ACCESS ROUTINES and 
are used in critical sections where a series of operations must be performed without 
interruption. 

3.6.2 ATTACHDBS Statement 

Syntax : 

— ATTACHDBS — ( — <arithmetic expression> — ) — | 

Semant i cs : 

arithmetic expression) must be a constant expression which identifies a D3 environment 
w°,* /SS^ix.? u "! n ''?- a ?i'yf . D f envir on«?ent will be linked up. The Mark Stack Control 

se 

ce 

ATTACHDBS . 



Word (MSCW) at the base of the current D4 environment is linked to the MSCW at the ba 
of the specified D3 environment. The effect of this operation is not immediate sin 
the processor s D3 register is not affected by the relinking done by ATTACHDBo 
Calling a procedure declared at lex level 3 is sufficient to force the necessary 
display register update. ' 



3.6.3 DMINQ Funct ions 



The DM INQUIRY interface permits direct communication with the DMSII ACCESSROUTINES 
It is intended only as a tool for use in implementing special purpose packages, such as 
on-line inquiry, and is specifically not intended for general user interface to DMSII. 

It is assumed that exactly one data base is invoked in the normal manner in the program 
which uses these constructs; otherwise, a syntax error will result. 

I. DMINQ [<arithmetic expression)] (<array row>) 

The arithmetic expression) is the SIB index for the desired structure. The <array 
row> is a one-dimensional array used to communicate with the ACCESSROUTINES The 
contents of the array control the function performed by the system. 

A [0] = identifies desired procedure 

1 = pathfinder (find key only) 

10 = set to beginning 

11 = data finder (find/lock next/current) 

12 = get data 

13 = DMS read (access data portion only) 

14 = get link 

16 = store current 

17 = free current 

18 = set or check dat e-t itnes t amp for TPS 

19 = clear TPS flag and dat e-t ime s tamp 

20 = return last transaction address 

21 = get status of abort 

22 = rerun finished-reset TPS abort pending 

23 = create 

24 = delete current 

25 = get statistics information 
26= visible DBS message 

27 = return displayed messages 

30 = return standard data set DATAEOFs 

A [i], i>0, depend upon A[0] as follows: 
1. Pathfinder (A[0] =1) 
A[l] = FIND op : 

-1 = current record 

= next in set 

1 = next in set = UKA 

2 = next in set > UKA 



2 = next in set > UKA 

3 = next in set >= UKA 

4 = 1 ink in set 

A [2] = SZ parameter to pathfinder 
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This parameter specifies the size of the key passed to 
pathfinder in the user key area. If SZ is less than zero 
(0) then ABS(SZ) is the number of hex characters in the user 
key; otherwise, SZ is the number of bytes in the user key. 

A [3] = SZ2 parameter to pathfinder 

This parameter specifies the size of the major portion of the 
user key which must exactly match the retrieved key. If SZ 
is less than zero (0), then ABS(SZ2) is the number of hex 
characters in the user key; otherwise, SZ2 is the number of 
bytes in the user key. 

As an example, if an index set had a concatenated key (A,B,C) 
with each portion two bytes long, to retrieve the next key 
where A=UKA and B=UKA requires SZ=4 and.SZ2«4 To retrieve 
the next key where A=UKA and B>UKA requires SZ=4 and SZ2=2 . 

If a record is found as specified, the AA word is returned in A [1]. 
A geldata call must be used to move the record to the user's work 
area . 

2. Set to beginning (A[0] = 10) 
A [i ] , i>0, not used. 

3. Datafinder (A[0] = 11) 

A[l] = FIND op: 

= find current data set 

1 = lock current data set 

2 = find next data set 

3 = lock next data set 

If a record is found, its AA word is returned in A[ 1 ] , and the record 
is moved to the user's work area. 

4. Getdata (A[0] = 12) 

A[l] = AA word of desired record. Moves the 
desired record to the user's work area. 



DMSREAD (A[0] = 13) 

A[l] = AA word of desired record. 



that only the 



This function is similar to the Getdata call, except that only tne 
data portion of the desired record is moved to the user s work area; 
structures embedded in the accessed record are unaffected. 

5. Get link (A[0] = 14) 

"Fetchkey" call on control manager: 

A[l] = Unused 

A[2] = LLOC parameter 

A[3] = LLEN parameter 

The link entry is returned in the array A[*]. 

7. Store current (A[0] = 16) 
A[ i ] , i >0, not .used. 

8. Free current (A[0] = 17) 
A[ i ] , i>0, not used. 

9. Set or Check Timestamp (A[0] = 18) 

Used to set or check the value of the Timestamp (TIME(6)) given to the 
ArrFSSROUTINES when the TPS Journal library is initiated. A[l] conta ns the 
T?mefta2r to be given to the ACCESSROUTINES. If the existing Timestamp in the 
IcCESSrSutInES ?s not zero and a. call on this ™INQ function is made (passing a 
new Timestamp), this DMINQ function returns a value of true and tne new 
Timeslamp is not captured by the ACCESSROUTINES. 

10. Clear TPS Flag (A[0] = 19) 

Sisnals the ACCESSROUTINES to set the TPSCLOSEDFLAG true and reset the 
Timestamp; which was given to the ACCESSROUTINES upon in. t . at ion of a TPS 



s 
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Journal library, to zero. 

11. Return Transaction Address (A[0] = 20) 

The Transaction Address in the Database Control File is returned in words Aroi 
A[l] and A[2] . This is the transaction address of the 

A[0] File number of the address 

A[l] : Block number of the address 

A[2] : Offset number of the address 

12. Status of Abort (A[0] = 21) 

The DMINQ function returns a value to TPS (in A[0]) which indicates the statu 
of an Abort. The possible values returned are: 1 : ACCESSROUTINES is waitinu for 
updaters to leave transaction state. 2 : All updaters are gone - waiting for an 
Abort 3 Abort finished - waiting for TPS to reprocess transactions 4 • No 
Abort or reprocessing of transactions is necessary 

13. Rerun Finished (A[0] = 22) 

This function tells the ACCESSROUTINES that TPS has finished reprocessine 
transactions. The ACCESSROUTINES resets the TPSABORTPENDING flag to false 

15. Create (A[0] = 23) 

A[l] = unused. 

A[2] = if variable format then 

record type, else unused. 

15. Delete current (A[0] = 24) 

M ' ] . i >0, not used . 

16. Get statistics information (A[0] = 25). 

Word - =25 

Word 1 - <structure number;. 

Word 2 - <type statistics> 

Word specifies a statistics request to the DMINQ interface. 

Word 1 indicates the structure number for which statistics are desired or equals 
if global statistics are desired. <=H""'s 

Word 2 specifies whether static or dynamic data is desired. A value of zero 
indicates static statistics are desired; a value of one indicates dynamic 
statistics are desired. 

The ACCESSROUTINES will process the request and will return the result in the 

trrF^Boi S rr?^ ng Ti, a S WOf f *■*<>'«•■ thru 2 will be unaffected by the 
ACCESSROUTINES. The format of the result is as follows: 

Word 3 - statistics result word 

* ord 4 ~ total number of words returned 

* ord 5 - index to header word for sub-group 1 

Word[Word 5] - header word for sub-group 1 

WordfWord 5+1] - first data word for sub-group 1 

Word[Word 5 + n] - header word for for sub-group 2 

Word[Word 4-1] - end of statistics flag 

Word 3 indicates the result of the statistics request. If the request was 
correct y formatted and honored, this word will be zero. Otherwise [0 1] will 
be equal to 1 and [35:8] will contain an error category. The currently defined 
error categories are as follows: ' 

1 - the structure number provided in word 1 did not 

correspond to an existing data set or set in the 
dat a base . 

2 - the statistics request type provided in word 2 was 

inval id (not or 1 ) . 

3 - a fault was encountered while retrieving statistics. 

Word 4 contains the total number of words returned in the array including all of 
the fixed words at the front of the array. 8 

Note : 
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If the array provided is too small to receive all of the statistics, it will be 
res ized. 

Word 5 contains the index of the first group of statistics infor- mation 
returned. Each group is preceded by a group header word indicating the type ol 
the group and the number of words of information in the group. 

The layout of this header word is as follows: 

[47:24] - not used 

[23:8] - group type , . 

[15:16] - number of words in group (including header) 

The last group of statistics is followed by an end-of-s tat i s t i cs header which 
has a group type of zero (0). 

The various group types and their layouts are as follows: 
Global Static Statistics (word 1 = 0, word 2=0) 
Group type 6 

Word - Contents 

1 Time data base opened (TIME(7) value) 

2 Maximum valid structure number in data base 

3 Data base options 



[0 
[1 

[2 



1] = 1 if statistics set in data base 

1] = 1 if data base is audited 

1] = 1 if lockstat ist ics set in data base 



Group type 5 



Word - Contents 

l_ n data base name including usercode prefix, if any. 
data base name is followed by 4 "00". 

II. Global Dynamic Statistics (word 1 = 0, word 2 = 1) 

Group type 1 

Word - Contents 

1 Current data base open count 

2 Current number of users that have data base open 

for update 

3 Current data base open state 

= data base not open 

1 = data base is opened temporary 

2 = data base is opened initialize 

3 = data base is opened normally 

4 = data base is undergoing recovery 

4 Maximum total buffer space in words 

5 Current total buffer space in words 

6 Current allowedcore value 

7 Maximum number of buffers allocated 

Group Type 2 (present only if STATISTICS is set) 

Word - Contents 

1 Number of forced data base overlays 

2 Number of normal data base overlays 

3 Time statistics collections started or was last 

reset (TIME(7) value) 
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Group Type 3 (present only if STATISTICS is set and data base is 

audited) 

Word - Contents 

1 First audit file number 

2 Current audit file number 

3 Starting audit block serial number 

4 Current audit block serial number 

5 Average number of words used in audit blocks 

6 Actual audit block size 

7 Number of audit I/O's initiated 

8 Total wait time accumulated on primary audit 

in t i cks 

9 Total wait time accumulated on secondary audit 

in t icks 

10 Total transaction count 

11 Total number of times processes where held up at 

BEG I N-TRAN S ACTI ON 

12 Total time spent waiting at BEGIN-TRANSACTION in 

t icks 

13 Total number of sync points taken 

14 Total number of control points taken 

15 Total time spent taking control points in ticks 

16 Sum of the number of buffers present at each 

control point 

17 Sum of the number of buffers flushed at each 

control point 

III. Structure Static Statistics (word 1 = <structure number>, 

word 2=0) 

Group Type 7 

Word - Contents 

1 Structure number 

2-4 Structure name (first byte is length in binary) 

5 Structure type 

2 = data set 
S = index set 

6 Structure subtype 

(see PROPERTIES 10068000-10094000) 

7 Structure nesting level (1 = disjoint) 

8 Structure block factor (in records for data sets, 

in key entries for index sets) 

9 Structure physical block size in words (including 

integrity checking words) 

10 Structure area size in sectors 

11 = 1 if structure is checksummed 

12 = 1 if structure is address-checked 

IV. Structure Dynamic Statistics (word 1 = <structure number>, 

word 2 = 1) 

Group Type 8 



Word - Contents 

1 Current number of random access users 

2 Current number of serial access users 

3 Current number of buffers allocated for structure 

4 Current number of big buffers allocated for 

s t rue t ure 

Group Type 11 (present only if STATISTICS is set) 

Word - Contents 

1 Number of physical reads against structure 

2 Number of physical writes against structure 

3 Number of ticks spent waiting for writes to 

compl e t e 

4 Number of ticks spent waiting for reads to complete 

5 Total amount of I/O time accumulated on file 

6 Number of read-aheads issued against structure 

7 Number of write-aheads issued against structure 
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Group Type 9 (present only if STATISTICS is set and structure is 
a data set) 

Word - Contents 

1 Number of finds against data set 

2 Number of Create/Store's against data set 

3 Number of Modify/Store's against data set 

4 Number of Deletes against data set 

5 Number of times control information changed 

Group Type 10 (present only if STATISTICS is set and structure is 

an index set) 

Word - Contents 

1 Number of Finds against index set 

2 Number of inserts in index set 

3 Number of key data changes in index set 

4 Number of key deletions from index 



No t e s : 



"ticks" refers to ticks of the processor clock at 2.4 
microseconds/tick. 

Groups may be returned in the array in any order. 

17. Visible DBS message (A[0] = 26) 

Starting at A[l] is the Visible DBS message to be processed. The message must 
be terminated by 4"00" . 

The message is passed to the Visible DBS message processing routine and any 

response message are returned starting at A[l]. If the response contains 

multiple lines 4"0D" is used to separate the multiple lines. The last line is 
terminated by 4"00" . 

18. Return All Displayable Messages (A[0] = 27) 

Returns the most recent displayable messages (does not include messages 
generated by the Visible DBS) in the array A, starting at the first character of 
word 0. If no messages exist, then seven nulls (48"00") are returned starting at 
the first character of word 0. The most recent 23 messages are returned in the 
order most recent to least recent. Each message is terminated by 48"0D" and the 
final message of the group is terminated by a null (48"00"). 

19. Collect standard data set DATAEOF's (A[0] = 30) I 

A[l] = Number of words in array I 

Starting at A[2] are pairs of words. One pair per structure. I 

A[N] I 

.[47:12] Structure number 
. f 35 : 16] Partition number 

(= if not partitioned) 

A[N+1] The value of DATAEOF is returned in this word. I 

UTILITY uses this DMINQ function to determine the DATAEOF values for standard 
data sets when performing an on-line dump. An entry is made in the array for 
each structure being dumped. The ACCESSROUTINES will return the DATAEOF value 
for the structure as it was two control points ago. UTILITY will then only check 
the checksums for those blocks of data that have an address less than or equal 
to DATAEOF. 

II. Three "intrinsic" arrays 

Note that these arrays may be used only in array reference assignment statements. 
They may not be used as ordinary arrays. 

1 . DMKEYAREA 
Hex array; the user's key area for the one SIB invoked. 

2. DMWORKAREA [X] 

Hex array; the user's work area for a particular 
s t rue t ur e . 

X is an arithmetic expression, value = SIB index for 
that structure (see below). 
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DMSIBDESC 



Real array; the SIB description for the SIB invoked. Used primarily 
to determine the SIB index for each invoked structure. The first N 
words of this array (0 to N-l) contain the structure number (plus 
other stuff) for each invoked structure. The index in the SIB 
description of this word is the value of the SIB index for that 
structure. N is equal to SIZE(DMSIBDESC)-8 . 

3.6.4 DMTRANSLOCK Statement 

Syntax : 

— DMSTRANSLOCK — ( — <formal array 1>— , > 

>-<formal array 2> — ) 1 



Semant i cs : 

DMTRANSLOCK is intended only for use in compilation of ACCESSROUTINES . It performs 
transaction locking for DMS jobs where <formal array 1> refers to a transaction lock 
and <formal array 2> is its new value. 

3.6.5 DMSCAUSE Statement 



Syntax : 

— DMCAUSE — ( — <arithmetic expression> — ) — | 

Semant ics : 

The DMSCAUSE statement calls the MCP procedure DMSCAUSE and passes a single real-valued 
parameter. The effect of the call is dependent on the parameter, as follows: 

parameter < Indicates that the calling program has left transaction state. The 
program is delinked from the transaction state linkage chain. 

parameter = Indicates that a syncpoint has been completed. All programs waiting 
for a syncpoint for this data base are awakened. 

parameter > Indicates that a record for which other users are waiting has been 
freed. The parameter is the stack number of the previous owner. All 
programs waiting on that stack number will be awakened. 

3.6.6 DMSFREE Statement 



Syntax : 

— DMSFREE —| 

Semant ics: 



This statement calls the MCP procedure DMSFREE, which causes all records locked by this 
process to be freed in every data base visible to the process. 

3.6.7 DMSUPDATEDISKHEADER Statement 



Syntax : 

— DMSUPDATEDISKHEADER — ( — <file designator;,— ) — | 

Semant ics : 

This statement causes the disk header for the designated file to be flushed to the 
directory. 

3.6.8 DMSWAIT Function 
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Syntax : 

— DMSWAIT — ( — <ari thmet ic exp. 1> — , > 

>-<ar i t hme t i c exp. 2> — , — <arithmetic exp. 3> — , > 

>-<array identifier> — ) 1 

Semant i cs : 

The DMSWAIT function is a Boolean-valued function with four parameters. The DMSWAIT 
function calls the DMSWAIT procedure in the MCP . The first three parameters are 
real-valued and the last is an array. The effect of the DMSWAIT function is dependent 
on the values of parameters 2 and 3. 

a. Parameter 2=0, parameter 3=0 

Indicates that the calling program needs to wait for a syncpoint to complete on this 
data base. The program is linked into the sleeper chain for the data base and is 
suspended. When a syncpoint is complete on this data base (indicated by some other 
program doing a DMSCAUSE(O) ) , this program will be awakened and a result of FALSE 
returned. If a deadlock is detected, this program is awakened and returned a result 
of BOOLEAN(l). If the program has specified a wait limit and the limit expires 
before the syncpoint occurs, the program is awakened and returned a value of 
BOOLEAN(3). 

Parameter 1 is a control word obtained from the location specified by parameter 3 in 
the array given as parameter 4. If the value of the control word from the array 
changes before suspending the program, a value of FALSE is immediately returned. 

b. Parameter 2=0, parameter 3 = -1 

Indicates that the calling program has entered transaction state. The program is 
linked into the transaction state linkage for the appropriate data base. If at the 
time of this call the program is already in transaction state, a result of TRUE is 
returned; otherwise, a result of FALSE is returned. 

c. Parameter 2 = -1, parameter 3 = -1 

If the number of processes waiting for locked records in this data base is less than 
the first parameter, a result of TRUE is returned; otherwise, a result of FALSE is 
returned. 

d. Parameter 2 > 0, parameter 3 > 

Indicates that the calling program needs to wait for a locked record. Parameter 2 
is the stack number of the current owner. The calling program is linked into the 
sleeper chain for the current owner of the record, the sleep count for this data 
base is incremented by one, and the program is suspended. When the current owner of 
the record frees it (indicated by doing a DMSCAUSE (<owner's stack number>)), this 
program is awakened and a result of FALSE returned. If a deadlock is detected, a 
result of BOOLEAN( 1 ) is returned. If the program has specified a wait limit and the 
limit expires before the record is freed, the program is awakened and returned a 
value of BOOLEAN(3) . 

Parameter 1 is a control word obtained from the location specified by parameter 3 in 
the array given as parameter 4. If the value of the control word from the array 
changes before suspending the program, a value of FALSE is immediately returned. 



3.6.9 DSED Funct ion 



Syntax : 
— DSED — 

Semant ics ; 



The DSED function is a parame t er 1 ess function which returns a Boolean result of TRUE if 
the program is DSed, and FALSE otherwise. 

3.6.10 DSWAIT and DSWAITANDRESET Functions 



DSWAIT and DSWAITANDRESET constructs are identical to WAIT and WAITANDRESET, except 
that a result of -1 indicates the job was DSed while waiting. Note that these 
constructs are intended for DMSII ACCESS ROUTINES only. 



A- 17 
B6000 SERIES MARK 32 



3.6.11 NEWDOPEVECTOR Func t i on 



Syntax : 

— NEWDOPEVECTOR — ( — <array identifiers 

>-<ar i thme t i c exp> — ) 



Scmant i cs : 

The NEWDOPEVECTOR function is a Boolean function with two parameters. The first 
parameter is a 2-dimens iona 1 array designator and the second is the new size for the 
first dimension. The new size may be larger or smaller than the current size. If the 
new size is smaller, rows will be deallocated. If the new size is larger, unallocated 
rows will be added. Care must be taken when using this function, since no copy 
descriptors will be fixed up. 

3.6.12 SIBOFFSET Function 



Syntax : 

— SIBOFFSET — ( — <procedure name> — ) — | 

Semant i cs : 

The SIBOFFSET function is a compi 1 e-t ime function that accepts a procedure name as its 
only parameter. The result of this function is the offset of this procedure in its 
envi ronment . 



3.6.13 SNR Function 



Syntax : 

— SNR — | 

Semant i cs : 



The SNR function is a parame terl ess function which returns as a real value the current 
value of the processor's stack number register. 

3.6.14 DMSFREEZE function 



Syntax : 
— DMSFREEZE — | 

Semant ics : 

The DMSFREEZE function calls the MCP procedure DMSFREEZE. The DMSFREEZE function is 
invoked to indicate to the MCP when a data base stack has been built and users may be 
attached. The DMSFREEZE function is a boolean value function which returns FALSE if 
the freeze is successful or returns a TRUE in the low order bit and an exception type 
in [19:16] if the freeze fails. 

The exception types possible are: 

1 The environment calling DMSFREEZE does not have an SCW within it. 

2 There are no stacks waiting to attach to the data base. 

3 The caller is already an active frozen data base. 

4 The caller is not a data base stack initiated by DMSOPEN. 

4. DMALGOL Reserved Words 

The reserved word type is indicated following each word. Refer to the ALGOL 
Language Reference Manual (Form No. 5001639) for details. 



A- 18 
B6000 SERIES MARK 3 2 



ALLOW (2) 
ATTACHDBS (2) 
DMINQ (2) 
DMKEYAREA (2) 
DMWORKAREA (2) 
DMSIBDESC (2) 
DISALLOW (2) 
DSIWAIT (2) 
DSWAITANDRESET (2) 
DMIO (2) 
DMSCAUSE (2) 
DMSFREE (2) 
DMTRANSLOCK (2) 
DMSWAIT (2) 

DMSUPDATED I SKHEADER ( 2 ) 
DS1ED (2) 
ENVIRONMENT (2) 
NEWDOPEVECTOR (2) 
NODE (2) 
PROPERTY (1) 
S1BOFFSET (2) 
SNR (2) 
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